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

Forumthread: Selektierten Bereich kopieren und einfügen

Selektierten Bereich kopieren und einfügen
29.12.2018 23:12:26
Gig
Hallo,
ich möchte mittels Makro einen selektierten Bereich vom Arbeitsblatt A in das Arbeitsblatt B kopieren. Die zu kopierenden Daten sollen in die erste freie Zeile des Arbeitsblatts B (beginnend in der ersten Spalte) eingefügt werden.
Vielen Dank im Voraus.
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Selektierten Bereich kopieren und einfügen
29.12.2018 23:24:41
Werner
Hallo,
so:
Public Sub kopieren()
Dim loLetzte As Long
With Worksheets("Tabelle2") 'Name Zielblatt anpassen
loLetzte = .Cells(.Rows.Count, 1).End(xlUp).Offset(1).Row
End With
'Name Zielblatt anpassen
Selection.Copy Worksheets("Tabelle2").Cells(loLetzte, 1)
End Sub
Gruß Werner
Anzeige
AW: Selektierten Bereich kopieren und einfügen
29.12.2018 23:28:06
Gig
Vielen Dank!!
Gerne u. Danke für die Rückmeldung. o.w.T.
29.12.2018 23:34:48
Werner
AW: Oder das Ziel ohne Variable :-)
29.12.2018 23:50:57
Gerd
Moin
Sub kopieren()
With Worksheets("Tabelle2") 'Name Zielblatt anpassen
Selection.Copy .Cells(.Rows.Count, 1).End(xlUp).Offset(1)
End With
End Sub

Gruß Gerd
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige