Hidden-Eigenschaft
31.10.2008 13:49:13
Ich
Danke der Hilfe von Beverly habe ich etwas für eine Tabelle hinbekommen:
Option Explicit
Sub Schaltfläche3_BeiKlick()
Rows("50:120").EntireRow.Hidden = False
Range("G50:K120").Sort Key1:=Range("K50")
Rows(50 + Application.WorksheetFunction.Count(Range("K50:K120")) & ":" & 120).EntireRow. _
Hidden = True
End Sub
Sub Schaltfläche5_BeiKlick()
Rows("50:120").EntireRow.Hidden = False
End Sub
Nun ist es aber so, dass ich das Tabellenblatt mit einem Passwort schützen muss, damit Kollegen nicht so viel Mist machen. Wenn ich das Blatt schütze, funktioniert das Ausführen der Button nicht mehr.
Die Hidden-Eigenschaft kann nicht festgelegt werden oder so. Was muss ich verändern?
Meric schon mal im Voraus!