petit probleme dans une boucle

[zephyr]

salut tt le monde


voila c simple


mon code est :

For i = 1 To 40 Step 1
a = i - 4
For j = 1 To 40 Step 1



If Feuil1.Cells(j, 2) <> "" Or Feuil1.Cells(i, 1) <> "" Then



--> If Feuil1.Cells(i - 4, 1) = 6 Then Feuil1.Cells(j, 1) = Feuil1.Cells(j, 3)




End If
Next
Next




prkoi ca accepte pas If Feuil1.Cells(i - 4, 1)!!!!



c le i -4 ki pose pb merci a vous de m'aider

 

[zephyr]

pour information j'ai teste avec i+ 4 et ca marche!!


commen on defini le signe moin en vb ?

 

[Mytå]

Salut Zephyr

Lorsque tu demarres ta boucle

For i = 1 To 40

i est alors egale a 1

Donc Cells(i-4,1) cherche la cells (-3,1) qui est impossible

 

[zephyr]

lol

merci javé pas vu