|
Welche Abfrage? Das Passwort muss nicht abgefragt werden. Die Blätter sind geschützt und Eingaben können nur über den VBA Code gemacht werden. Wofür also die Abfrage eines Passworts?
-Stimmt, das war ein Denkfehler meinerseits, sorry dafür :/
Ich habe es jetzt einfach mal über den Button "Blatt schützen" manuell in Excel gemacht.
Über den VBA-Code habe ich es leider nicht hinbekommen.
Ich habe ihn immer direkt auf dem Sheet ausgeführt. Also mit dem anderen Button zsm. so:
Sub Schaltfläche1_Klicken()
UserForm1.Show
End Sub
Private Sub Blaetter_schuetzen()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
sh.Protect Password:="AF21", UserInterfaceOnly:=True
Next sh
End Sub
Ist das denn korrekt so? Oder liegt hier vllt mein Fehler?
|