Bonjour,
Avec cette macro j'aimerais copier les ligne d'une feuille 1 vers une feuille 2 en sautant une ligne à chaque fois sur la feuille 2. En revanche si la ligne i de la feuille 1 est vide alors ne rien faire et passer à la ligne suivante. Avec le code suivant:
Mais en faisant du "pas à pas " je me rends compte que même lorsque la ligne rows(i) est vide la variable "j" est incrémentée à "j+2" alors que je voudrais que "j" reste à sa valeur et ne passe à j+2 que si rows(i) est non vide...
Si quelqu'un peut m'aider merci d'avance!!
Avec cette macro j'aimerais copier les ligne d'une feuille 1 vers une feuille 2 en sautant une ligne à chaque fois sur la feuille 2. En revanche si la ligne i de la feuille 1 est vide alors ne rien faire et passer à la ligne suivante. Avec le code suivant:
VB:
Dim i&
Dim j&
Dim line As Variant
Derlig = worksheets("feuille1").Range("A" & Rows.Count).End(xlUp).Row
j = 1
For i = 1 To Derlig
line = worksheets("feuille1").Rows(i)
If IsEmpty(Rows(i).Value) = False Then
worksheets("feuille2").Rows(j).Value = line
j = j + 2
Else: j = j
End If
Next i
Si quelqu'un peut m'aider merci d'avance!!
Dernière édition: