Hallo,
wir speichern in der Firma täglich eine Kopie der immergleichen Datei in einen Ordner.
Aus diesen Kopien brauche ich jetzt 3 Bereiche einer (immer dergleichen) Tabelle.
Diese 3 Ranges sollen in eine neue Mappe kopiert werden in immer die gleiche Tabelle, so daß ich am Ende alle kopierten Bereiche nebeneinander in einer Tabelle stehen habe. Dazu habe ich mir folgendes Makro gebastelt:
Mein Problem ist, daß das Makro bereits bei
Set rngTarget = Workbooks("HierRein.xls").Sheets("input").Range("A1").End(xlToRight).Offset(0, 1)
streikt. Egal, ob End(xlToRight) oder (xlRight), es geht nicht. Lasse ich das raus, funktioniert es, das aber ist natürlich nicht die Lösung.
Was mache ich falsch? Welche Änderungen müssen gemacht werden, damit ich die Daten alle rüberbeamen kann?
Gruß,
Martin