Hallo,
ich habe folgendes Problem:
Ich möchte Daten aus einer Excel-Datei in eine andere Excel-Datei kopieren.
Bisher habe ich es nur geschafft Daten aus einer Zeile, einge Zeilen weiter unten wieder einzufügen. Aber eben innerhalb der gleichen Datei.
Dazu habe ich folgenden Code verwendet:
**********************************************************
excelObject.Range("A1:A5").Copy
excelObject.Cells(5, 1).Insert
**********************************************************
Das funktioniert. Aber wenn ich die Daten in ein anderes ExcelObject einfügen will erhalte ich nur eine leere Datei. Hier der Code:
**********************************************************
Set excelObject2 = CreateObject("Excel.Application")
excelObject2.Application.Workbooks.Add
excelObject2.Cells(1, 1).Activate
excelObject.Range("A1:A5").Copy
excelObject2.Cells(1, 1).Insert
**********************************************************
Woran könnte das liegen ? Ich hoffe ich habe mich verständlich ausgedrückt.
ich habe folgendes Problem:
Ich möchte Daten aus einer Excel-Datei in eine andere Excel-Datei kopieren.
Bisher habe ich es nur geschafft Daten aus einer Zeile, einge Zeilen weiter unten wieder einzufügen. Aber eben innerhalb der gleichen Datei.
Dazu habe ich folgenden Code verwendet:
**********************************************************
excelObject.Range("A1:A5").Copy
excelObject.Cells(5, 1).Insert
**********************************************************
Das funktioniert. Aber wenn ich die Daten in ein anderes ExcelObject einfügen will erhalte ich nur eine leere Datei. Hier der Code:
**********************************************************
Set excelObject2 = CreateObject("Excel.Application")
excelObject2.Application.Workbooks.Add
excelObject2.Cells(1, 1).Activate
excelObject.Range("A1:A5").Copy
excelObject2.Cells(1, 1).Insert
**********************************************************
Woran könnte das liegen ? Ich hoffe ich habe mich verständlich ausgedrückt.