Range-Objekt verschieben?
13.01.2004 11:57:04
Marco
ich habe zur Zeit eine Gedankenblockade, vielleicht kann mir jemand helfen.
Ich möchte in einer Tabelle, mit Hilfe von VBA, zwei Zeilen mit einem Offset
von 2 verschieben. Ich hatte gedacht, das ich ein Feld von 2 Zeilen mit 23 Spalten auswählen kann, um es dann, um 2 Zeilen verschoben, wieder einfügen zu können.
Leider gibt es immer Fehlermeldungen, oder aber es werden nur die Zeilen gelöscht.
Dies ist der Code mit dem ich es versucht habe:
Worksheets(MPListName).Range(Worksheets(MPListName).Cells(mpcA + 2, mpid), Worksheets(MPListName).Cells(mpcA + 3, maxrows)) = _
Worksheets(MPListName).Range(Worksheets(MPListName).Cells(mpcA, mpid), Worksheets(MPListName).Cells(mpcA + 1, maxrows))
Ich würde mich über einen Ratschlag oder eine Lösung des Problems freuen.
MFG
Marco