Einen Bereich um Anzahl Zeilen nach unten verschieben
Hallo,
Habe diese Makro mit dem Makrorecorder aufgenommen:
Ich möchte nun diesen markierten Bereich mit Inhalt um 6 Zeilen nach unten verschieben.
Ich habe da an folgendes gedacht:
Da habe ich mit dem Offset rumgespielt aber da bekomme einen Hinweis über das Argument was nicht richtig ist.
Könnte mir einer von Euch Profis auf die Sprünge helfen? Vielen Dank
Mfg Tom
Habe diese Makro mit dem Makrorecorder aufgenommen:
Sub Makro5()
'
' Makro5 Makro
'
'
Range("I7:N17").Select
End Sub
Ich möchte nun diesen markierten Bereich mit Inhalt um 6 Zeilen nach unten verschieben.
Ich habe da an folgendes gedacht:
Selection.Cut Destination:=Range.......
Da habe ich mit dem Offset rumgespielt aber da bekomme einen Hinweis über das Argument was nicht richtig ist.
Könnte mir einer von Euch Profis auf die Sprünge helfen? Vielen Dank
Mfg Tom
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 177192
Url: https://administrator.de/contentid/177192
Ausgedruckt am: 17.11.2024 um 11:11 Uhr
2 Kommentare
Neuester Kommentar
Hallo Tommylik!
Wenn die 6 Zeilen konstant sind, würde ich einfach eine entsprechende Anzahl an Zellen einfügen und damit den markierten Bereich nach unten verschieben:
Falls Du aber überschreiben willst, war Dein Ansatz nicht so verkehrt:
Grüße
bastla
Wenn die 6 Zeilen konstant sind, würde ich einfach eine entsprechende Anzahl an Zellen einfügen und damit den markierten Bereich nach unten verschieben:
Selection.Resize(6).Insert Shift:=xlDown
Selection.Cut (Selection.Offset(6))
bastla