PDA

Vollständige Version anzeigen : Einblenden von Spalten sperren...


BA_LI
11.11.2005, 11:39
Hallo Zusammen,

mit welcher Funktion, kann man das Einblenden von Spalten sperren. Sie sollen ausgeblendet werden, dass kein Anderer sie wieder einblenden kann.

Vielen Dank im vorraus.

BA_LI
11.11.2005, 14:27
Hallo,

das Problem ist gelöst.

Private Sub Workbook_Open()
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="xxx"
Sheets(i).EnableSelection = xlUnlockedCells
Next i
End Sub