Bonjour et bonne semaine à tous,
J'ai créée une maccro qui insère des lignes vides entre des lignes contenant des infos mais quand je la lance, la macro insère des lignes à l'infini sans s'arréter alors que je voudrais qu'une seule ligne s'insère puis qu'on passe à la suivante:
Dim vide as range
For Each vide In Range('B4:B' & Range('B65536').End(xlUp).Row)
If vide <> '' Then
vide.Entirerow.Select
Selection.Insert Shift:=xlDown
End If
Next vide
End If
J'ai créée une maccro qui insère des lignes vides entre des lignes contenant des infos mais quand je la lance, la macro insère des lignes à l'infini sans s'arréter alors que je voudrais qu'une seule ligne s'insère puis qu'on passe à la suivante:
Dim vide as range
For Each vide In Range('B4:B' & Range('B65536').End(xlUp).Row)
If vide <> '' Then
vide.Entirerow.Select
Selection.Insert Shift:=xlDown
End If
Next vide
End If