Hallo VBA Spezialisten,
Ich übertrage Daten von ein Workbook in ein anderes Workbook.
Das funzt prima, es müssen aber beide Workbooks geöffnet sein.
Frage:
Geht das vielleicht auch wenn das Workbook „Bestand Rollenware _Einkauf“ nicht geöffnet ist?? Wahrscheinlich wohl nicht.
Wenns doch möglich ist, wie?
Mit bestem Dank im voraus für eventuelle Hilfe.
Gruß Skaletti!
Hier mein jetziges Makro:
Public Sub Kopieren()
Workbooks("Bestand Rollenware\_Lager.xls").Sheets("Lager").Range("B2:G35").Copy
Workbooks("Bestand Rollenware\_Einkauf.xls").Sheets("Einkauf").Range("B2").PasteSpecial xlPasteValues
Workbooks("Bestand Rollenware\_Lager.xls").Sheets("Lager").Range("B37:G70").Copy
Workbooks("Bestand Rollenware\_Einkauf.xls").Sheets("Einkauf").Range("B37").PasteSpecial xlPasteValues
Workbooks("Bestand Rollenware\_Lager.xls").Sheets("Lager").Range("B72:G105").Copy
Workbooks("Bestand Rollenware\_Einkauf.xls").Sheets("Einkauf").Range("B72").PasteSpecial xlPasteValues
Workbooks("Bestand Rollenware\_Lager.xls").Sheets("Lager").Range("B107:G140").Copy
Workbooks("Bestand Rollenware\_Einkauf.xls").Sheets("Einkauf").Range("B107").PasteSpecial xlPasteValues
Application.CutCopyMode = False
End Sub