Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Kopieren über Makro

Forumthread: Kopieren über Makro

Kopieren über Makro
20.10.2004 12:27:49
Torsten
Hallo beisammen,
vor einiger Zeit habe ich mir hier im Forum den folgenden Code erfragt:

Sub PREPBES_Copy()
'kopiert den Range (Zeile 5 bis 524) der Spalte,
'in der sich der Cursor gerade befindet
Range(Cells(5, ActiveCell.Column), Cells(524, ActiveCell.Column)).Copy
End Sub

Wie muß ich den Code anpassen, daß Excel auch den Range mehrerer (zusammenhängender) Spalten kopiert? Bisher habe ich z.B. den Cursor in Zelle A1 gesetzt, und der Range A5:A524 wurde kopiert. Nun möchte ich z.B. den Range B1:D1 (kann verschieden sein) markieren, und Excel soll dann den Range B5:D524 kopieren.
Könnt Ihr mir weiterhelfen?
Vielen Dank schon einmal vorab.
Gruß
Torsten
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren über Makro
20.10.2004 12:50:37
Claus
Hallo Torsten,
der Weg ist einfach. Du suchst eine geschickte Lösung für Range(B5:E524).copy
Mit den Cursor wird ein Zeilenbereich z.B. B1 bis E1 markiert.
Der Code ist dann:
Range(Cells(5, ActiveCell.Column).Address & ":" & Cells(524, ActiveCell.Column + Selection.Columns.Count - 1).Address).Copy
Gruß
Claus
Anzeige
AW: erledigt - m.T.
Torsten
Hallo Claus,
wunderbar, genau das, was ich brauchte.
Vielen Dank für Deine Hilfe.
Gruß
Torsten
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18