Gibt es eine Möglichkeit, dass immer automatisch 2 Leerzeilen eingefügt werden, wenn eine andere Zahl (zB. C3 C4) in der Spalte steht?
Kann mir jemand helfen?
MFG Dennis
Sub LeereZeilen()
Dim lngCount As Long
For lngCount = Range("C65536").End(xlUp).Row To 2 Step -1
If Cells(lngCount, 3) <> Cells(lngCount - 1, 3) Then
Rows(lngCount & ":" & lngCount + 1).Insert
End If
Next
End Sub