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:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
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?
EDIT: Jetzt wird mir wieder angezeigt, dass das Blatt geschützt ist, aber trotzdem sind manuelle Eingaben in die Tabelle ohne die Maske zu benutzen noch möglich.
|