Filter setzen funkt manuell aber nicht per VBA
03.03.2017 16:51:13
Tim
Ich habe ein Blatt mit Blattschutz.
Beim Öffnen der Datei erlaube ich per VBA das Filtern und verschiedene andere Aktionen auf diesem Blatt:
Worksheets(2).Protect Password:=constPass, DrawingObjects:=False,
Contents:=True, Scenarios:=False,
AllowFormattingCells:=True, AllowFormattingColumns:=True,
AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True
Verwende ich aber folgendes Makro, dann funktioniert es nur, wenn ich per VBA jedes Mal das Passwort aufhebe, was ich gerne vermeiden möchte:
Worksheets(2).Range("A:B").AutoFilter Field:=2, Criteria1:="P"
Vielen Dank im Voraus,
Tim