Linie löschen
19.05.2019 11:50:42
Peter
stehe grade vor dem Problem, dass ich in einem Arbeitsblatt Zeilen per
Sub eingefügt habe. Leider wird beim Einfügen auch die Linie aus der Zeile darüber übernommen.
Hat jemand eine Idee wie ich diese Linie löschen kann?
Schon mal besten Dank im voraus für eure Mühe und Hilfe.
Einen schönen Sonntag
Peter
Option Explicit
Sub einfügen(ByVal insertRow As Integer)
Dim i As Integer
For i = 0 To 2
Rows(insertRow + i).Select
Selection.Insert Shift:=xlDown
Next i
End Sub