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

Selektierten Bereich kopieren und einfügen

Forumthread: Selektierten Bereich kopieren und einfügen

Selektierten Bereich kopieren und einfügen
30.12.2018 00: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
30.12.2018 00: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
30.12.2018 00:28:06
Gig
Vielen Dank!!
Gerne u. Danke für die Rückmeldung. o.w.T.
30.12.2018 00:34:48
Werner
AW: Oder das Ziel ohne Variable :-)
30.12.2018 00: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