wie kann ich ein Dokument gegen Veränderung des Inhalts schützen, dem Benutzer aber trotzdem die Auswahl über einen eingerichteten Autofilter erlauben?
Gruesse aus Dortmund.
Stefan
Sub Workbook_Open()
Sheets("Adresse").Protect UserInterfaceOnly:=True, Password:="Passwort"
Sheets("Adresse").EnableOutlining = True ' Für Gliederung
Sheets("Adresse").EnableAutoFilter = True ' Für AutoFilter
End Sub
Sub Autofilter_bei_Blattschutz()
ActiveSheet.Protect UserInterfaceOnly:=True
ActiveSheet.EnableAutoFilter = True
End Sub
Sub Blattschutz()
' Makro Blattschutz mit Autofilter
' Makro am 04.06.2004 von Stefan
ActiveSheet.Protect Password:="Stefan", DrawingObjects:=True, Contents:=True, Scenarios:=True, UserInterfaceOnly:=True
ActiveSheet.EnableAutoFilter = True
End Sub
Sub Blattschutz()
' Makro Blattschutz mit Autofilter
' Makro am 04.06.2004 von Stefan
ActiveSheet.Protect Password:="Stefan", DrawingObjects:=True, Contents:=True, Scenarios:=True, UserInterfaceOnly:=True
ActiveSheet.EnableAutoFilter = True
End Sub