Frage: Warum funktioniert unten stehendes Makro nicht?
-Hintergrund ist, ich habe ein Makro in Tabelle4 geschrieben, das sich auf Tabelle5 bezieht und dort die Filterfunktion auslösen soll (Ergebnis) dann den Druckbefehlt aktiviert und dann zu Tabellenblatt4 zurückführt!
-Sobald ich das Tabellenblat5 schütze funktioniert das Makro nicht!! Folgende Fehlermeldung im Makro erscheint:ActiveSheet.Range("$A$7:$J$12604").AutoFilter Field:=1, Criteria1:=""
WAS BITTE ist FALSCH? P.S. (Komischer Weise funktionierte manschmal doch!!!!!) und auf einmal, NIE MEHR!!!!
Bitte um Hilfe.
Public Sub DPDENDLOS()
With Tabelle3
.Protect Password:="geheim", UserInterfaceOnly:=True
.EnableAutoFilter = True
End With
End Sub
Sub Endloslistendruck_DPD()
'
' Endloslistendruck_Makro
'
' Sheets("Tabelle4").Select
Sheets("Druckversion Endlos").Select
ActiveSheet.Range("$A$7:$J$12604").AutoFilter Field:=1, Criteria1:=""
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"
Sheets("Tabelle4").Select
Columns("Y:Y").Select
Sheets("Druckversion Endlos").Select
Sheets("Tabelle4").Select
End Sub