Live-Forum - Die aktuellen Beiträge
Datum
Titel
06.10.2025 08:12:13
VBA - Von Word Doc in Excel Sheet schreiben
05.10.2025 23:18:01
Summewenns aber mit VBA
05.10.2025 11:43:19
Bed. Format. Spezialfall, Möglich, die Registerfarbe nutzen?
04.10.2025 18:18:42
Anzahl in einer Zelle automatisch ermitteln
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Range-Objekt verschieben?

Forumthread: Range-Objekt verschieben?

Range-Objekt verschieben?
13.01.2004 11:57:04
Marco
Hallo,
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
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Range-Objekt verschieben?
13.01.2004 12:27:40
Karl-Otto Reimann
Hallo Marco
Folgende Prozedur fügt die beiden markierten letzten Zeilen 2 Zeilen darunter als Werte
wieder ein:

Sub marco_test()
With ActiveCell
Range(.Offset(2, 0), .Offset(3, 23)).Value = Selection.Rows.Value
End With
End Sub

mfG KO
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige