Hallo Zusammen,
ich habe per Recorder eine Formatierung meiner Tabelle aufgezeichnet. Sofern ich diese Tabelle nun kopiere (selbe Datei), dann kann ich das aufgezeichnete Makro nicht mehr verwenden (Fehler 1004):
Sub fürSteuerberater()
'
' fürSteuerberater Makro
'
' Tastenkombination: Strg+s
'
Range("Tabelle1[[#Headers],[broj" & Chr(10) & "zaposlenika" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "MA-Nr.]]").Select
Tabelle1.ListObjects("Tabelle1").ShowTotals = True
Columns("F:O").Select
Selection.EntireColumn.Hidden = True
Columns("T:T").EntireColumn.AutoFit
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 1
Columns("C:C").Select
Selection.EntireColumn.Hidden = True
Range("Tabelle1[#All]").Select
Range("Tabelle1[[#Totals],[Praznici" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "Urlaubstage]]").Activate
Selection.PrintOut Copies:=1, Collate:=True
Range("Tabelle1[[#Headers],[broj" & Chr(10) & "zaposlenika" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "MA-Nr.]]").Select
End Sub
Tabelle1 hab ich schon durch ActiveSheet oder thissheet ersetzt, geht aber trotzdem nicht.
Kann mir jemand helfen?
|