ERREUR 1004

vgendron

XLDnaute Barbatruc

• 24 Avril 2019

• #2

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

 

Vote positif 0 Vote négatif

S

saradi

XLDnaute Nouveau

• 24 Avril 2019

• #3

j'ai essayé avec toutes les versions excel mais ça marche pas
en tout cas merci infiniment

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 24 Avril 2019

• #4

Bonsoir

Tiens ce code me dit quelque chose...
Mais moi dans l'autre fil, je l'avais posté avec cette syntaxe

https://www.excel-downloads.com/threads/argument-procedure.20030770/#post-20227475

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 )

 

Vote positif 0 Vote négatif