auch wenn ich es nicht gerne mache, nochmal auf eine offene Frage hinzuweisen aber sie steht schon soweit unten! Könnt Ihr Euch nochmal dem Beitrag von
24.08.2006 15:28:45
anschauen. Es ist für mich (uns) sehr wichtig.
Vielen Dank!
Private Sub Worksheet_Activate()
ActiveSheet.Protect userinterfaceonly:=True
ActiveSheet.EnableAutoFilter = True
End Sub
Private Sub Worksheet_Activate()
ActiveSheet.Protect userinterfaceonly:=True, Password:="test"
ActiveSheet.EnableAutoFilter = True
End Sub