Hi,
Ich habe ein Problem mit folgendem Codestück
Code:
Workbooks("drafts.xls").Worksheets("draftrel10").Range("A1:C28").Copy _
Destination:=Workbooks("Mappe1").Worksheets(backupText).Range("A1")
hier wird fast alles kopiert. Daten, Grafik(Bilder ja, Linien nein) etc. leider aber nicht das Layout (Zeilen und Spaltenbreite). Kann ich das irgendwie angeben?
Ich habs auch mit einem leicht abgeänderten Code versucht
Code:
Workbooks("drafts.xls").Worksheets("draftrel10").Range("A1:C28").Copy
Workbooks("Mappe1").Worksheets(backupText).Range("A1").PasteSpecial
Paste:=xlPasteColumnWidths, _
Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Dann bleibt die Tabelle im Zielworkbook leer. ;(
Kann man irgendwie Tabellen so wie sie sind (mit allen Grafiken, Formatierungen etc.) von einem Workbook in ein anderes kopieren?
Danke für eure Hilfe,
Andreas