Blattschutz und Datenüberprüfung kritisch?
Kie
ich besitze eine Datei, die einen Workbookschutz und einen Blattschutz hat.
ThisWorkbook.Protect Password:="test", Structure:=True
blatt.Protect Password:="test", UserInterfaceOnly:=True
das funktioniert alles.
Per VBA wird nun in eine Zelle eine Datenüberprüfung per Makro geschrieben:
Target.Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=AuswahlListe" 'auswahlliste als Dropdown anzeigen
.IgnoreBlank = False
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Ohne Paswortschutz funktioniert alles. Mit Passwortschutz erhalte ich eine Fehlermeldung an dieser Stelle.
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=AuswahlListe"
Fehler: Laufzeitfehler 1004, Objekt oder Anwendungsbezogener Fehler.
Hat jmd eine Idee? Dieser Fehler tritt ebenfalls auf, wenn ich die Targetzelle wieder mit Passwort freigebe! Aber ohne Passwortschutz funktioniert alles!
Hat VBA Probleme eine Datenprüfung zu erstellen, weil das Workbook mit seiner Structure geschützt ist? Woran könnte es noch liegen?
Vielen Dank.
p.s. Ich kann euch die Datei leider nicht zur Verfügung stellen, da sie zuviele sensible Daten beinhaltet. Gerne gebe ich aber genauere Beschreibungen wenn es nicht verständlich genug war.