syntaxfehler
01.10.2003 12:33:23
mikatigra
Hallo zusammen,
ich habe folgenden Code aufgezeichnet und um die if-Schleife ergänzt.
If Selection.AutoFilter Field:=2, Criteria1:="1" Then
Columns("Q:Q").Select
Selection.EntireColumn.Hidden = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Else
Columns("R:R").Select
Selection.EntireColumn.Hidden = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End If
End Sub
Habe aber leider schon in der 1. Zeile einen Syntax-Fehler.
Kann mir jmd. den Syntax-Fehler erklären und beseitigen?
Danke.