Hallo,
ich will im Blatt Test alles ab der 2 Zeile um eine Zeile nach unten schieben.

Das geht auch, wenn ich mit Select arbeite.
Sheets("Test").Select
Rows("2:2").Select
Selection.Insert Shift:=xlDown

Da ich immer mehr versuche ohne Select auszukommen, such ich nach einer
Möglichkeit das ganze ohne Select zu machen.

Hat jemand einen Ansatz?

Vielen Dank im Voraus und frohe Weihnachten
Gruß Horst