[résolu] Modification d'une macro

J

JJ1

Guest

• 19 Décembre 2013

• #2

Re : Modification d'une macro

Bonsoir,
Il faut "sauter" la copie par If Cells(i, 5).Value = "*" Then Goto 1
et mettre 1 avant Next
A mon avis, ça devrait fonctionner, à tester.
a+

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 19 Décembre 2013

• #3

Re : Modification d'une macro

salut

sans GoTo :

Code:

For i = 1 To Range("D65536").End(xlUp).Row
  If Cells(i, 4) <> "*" Then Cells(i, 6).Value = Cells(i, 4) & " " & Cells(i, 5)
Next

 

Vote positif 0 Vote négatif

K

klorane

XLDnaute Occasionnel

• 19 Décembre 2013

• #4

Re : Modification d'une macro

Merci à vous deux pour vos réponses!

ça fonctionne.

merci du coup de main.

Klorane

 

Vote positif 0 Vote négatif