ERREUR 1004

saradi

XLDnaute Nouveau
J'ai essayé avec ce programme au début il marchait très bien ensuite il me fait apparaître cette erreur je ne sais pas pourquoi . s'il vous plait des propositions
 

Fichiers joints

vgendron

XLDnaute Barbatruc
Bonjour à toi aussi....
pas d'erreur chez moi...
au hasard.. ca marchait bien sur un pc avec excel 2016, et ca ne marche plus avec un Excel 2007

==> diffrentes versions de Excel ===> aller voir du cote de .interior.color et .interior.colorindex
 

Staple1600

XLDnaute Barbatruc
Bonsoir

Tiens ce code me dit quelque chose...
Mais moi dans l'autre fil, je l'avais posté avec cette syntaxe ;)
VB:
Private Sub plan1(ligne As Long, r_un As Long, delai As Long)

'reinitialiser la ligne
 'Worksheets("CHECKLIST").Activate
 Cells(ligne, 1).Resize(, 20).Interior.Color = xlNone
 
'tracer plan
 Cells(ligne, r_un).Offset(, -delai).Resize(, delai).Interior.Color = 192
 
End Sub

Sub tracer()
plan1 4, 7, 3
plan1 5, 8, 7
End Sub
PS: vgendron (salutations ;) )
 

Discussions similaires


Haut Bas