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

Kopieren per makro in anderes WB

Forumthread: Kopieren per makro in anderes WB

Kopieren per makro in anderes WB
18.05.2008 16:36:00
mercedesmann
Hallo Leute!
Habe folgendes Problem. Ich möchte das bestimmte Werte einer Tabelle per Knopfdruck in ein anderes Workbook kopiert werden. Die Werte sollen Zeilenweise einkopiert werden und bei jeder Ausführung der Kopierfunktion eine Zeile tiefer rutschen. bzw. solle eine fortlaufende Liste erstellt werden.
Danke im voraus
Gruß Willi
https://www.herber.de/bbs/user/52435.xls

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren per makro in anderes WB
18.05.2008 18:17:00
mercedesmann
Hallo Hans, Hallo Mas!!
Das sieht schon genau so aus wie ich es brauche. Allerdings jetzt noch in einem Workbook. Wenn ich die Daten in ein anderes Workbook kopieren will, nennen wir es mal datensammlung.xls, welchen Bereich muss ich entsprechend ändern?
Vielen Dank schon mal für eure Mühe ;)

Anzeige
AW: Kopieren per makro in anderes WB
18.05.2008 18:31:23
Hans-Joachim
Hallo Willi,
dann fügst Du nach "Selection.Copy" noch eine Zeile in dein Makro ein:
Selection.Copy
Windows("AnderesWorkbook.xls").Activate
Sheets(2).Select
Gruß Hans

AW: Kopieren per makro in anderes WB
18.05.2008 18:48:18
mercedesmann
Danke Hans!!
Genau das wars!!! Vielen Dank nochmal
Gruß Willi

AW: Kopieren per makro in anderes WB
18.05.2008 17:59:00
MAS
Oder z.B. so -

Sub test()
Dim anzZeilen
' Anzahl Zeilen in der Zieltabelle ermitteln
anzZeilen = Worksheets("tabelle2").Cells(65536, Range("A1").Column).End(xlUp).Row
' Die einzelnen Werte kopieren
Worksheets("tabelle1").Range("A1").Copy Destination:=Worksheets("tabelle2").Range("A" &  _
anzZeilen + 1)
Worksheets("tabelle1").Range("A2").Copy Destination:=Worksheets("tabelle2").Range("B" &  _
anzZeilen + 1)
End Sub


Anzeige
;

Beliebteste Forumthreads (12 Monate)

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