Habe folgendes Makro:
Dim alte
alte = ActiveSheet.Name
MsgBox alte
Sheets(www).Copy before:=Sheets(1)
Dim neue
neue = ActiveSheet.Name
Range("C23:J42").Clear
Range("F19").Select
alte.Select
Range("C23:J42").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
'---wieder zurück ----
neue.Select
Application.CutCopyMode = False
End Sub
Ich möchte also das Format der alten Tabelle in die neue kopieren, leider bleibt mein Makro hier
stehen: alte.Select
und schreibt asl Fehlermeldung Object erforderlich
mfg Walter