...das die neue Datei genauso formatiert ist wie der Quellbereich?
Bis denne,
Maik
...das die neue Datei genauso formatiert ist wie der Quellbereich?
Bis denne,
Maik
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Dann folgt Application.CutCopyMode = False etc.
So werden zuerst die Werte mit den Datenformaten und danach die Zellenformate übertragen.
P.S.
Mein Excel 97 versteht die Konstante "xlPasteValuesAndNumberFormats" nicht, sondern nur xlPasteValues. Ob es sich bei dir um eine höhere Version handelt?
BTW: Ich nehme XL 10, die betreffende Datei muss aber auch unter XL 8 laufen. Schlimmstenfalls muss ich also nach ersten Versuchen auf xlPasteValues korrigieren...
Bis denne,
Maik