Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1664to1668
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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.

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
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

340 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige