wie verwende ich die ProtectionMode-Methode?
10.05.2006 08:45:36
Rainer
kann mir einer Erklären, wie ich die ProtectionMode-Methode anwenden kann?
Problem:
In einem geschützten Blatt sollen per Makro Eintragungen vorgenommen werden.
Das Blatt ist über den Reiter "Schutz" bei der Zellformatierung und dann mittels Blattschutz schreibgeschützt.
Diesen Blattschutz möchte in meinem Skript erst abfragen, bevor ich ihn aufhebe, dies sollte eigentlich mit ProtectionMode gehen, tut's aber nicht...
Hier der Code:
Private Sub CommandButton1_Click()
If ActiveSheet.ProtectionMode Then
ActiveSheet.Unprotect Password:=test
Sheet_war_geschutzt = True
Else
Sheetwargeschutzt = False
End If
For i = 1 To 10
ActiveCell = i
ActiveCell.Offset(1, 0).Activate
Next i
If Sheet_war_geschutzt Then ActiveSheet.Protect Password:=test
End Sub
In der Excel-Hilfe steht noch, dass UserInterfaceOnly true sein sollte, aber nicht wie das geht.
Ich hoffe jemand kennt das Problem und kann mir helfen!
Gruss
Rainer