Leerzeile einfügen
31.08.2004 15:31:02
Fabienne
Ich möchte gerne dass mein Makro immer nach der Zeile 'other data' eine Leerzeile einfügt. Da die Zeilen mit 'other data' nicht in regelmässigen Abständen vorkommen funktioniert mein Code nicht.
Kann mir jemand sagen wie ich ihn abändern muss? Danke schon im Voraus!
Sub Abstandszeile_einfügen()
For k = 1 To 500
k = k + 95
Range("A" & k).Select
Selection.EntireRow.Insert
Next k
End Sub