VBA-Makro Blattschutz mit Umlauten
10.10.2022 14:04:26
Thomas
ich habe ein Makro in einer Excel-Datei welches alle Tabellenblätter beim Öffnen überprüft ob alle Blätter Passwortgeschützt sind. Falls nicht soll ein definiertes Passwort das Blatt schützen. Die Herausforderung ist, das das Passwort ein Umlaut verwenden soll wie z.B. Passwort = Köln da die Datei von vielen Benutzern im Ausland verwenden wird. Jetzt habe ich das Problem, das vereinzelte Benutzer im Ausland einen Laufzeitfehler 1004 bekommen mit dem Hinweis Passwort nicht korrekt.
Da es aber nur Vereinzelte ausländische Benutzer sind welche das Problem haben scheint es keine generelles Problem zu sein.
Hat vielleicht jemand eine Idee oder Lösung wie man eventuell diesen Fehler beheben oder zumindest unterdrücken kann.
Der VBA-Code lautet:
Private Sub Workbook_Open_protect()
Dim i As Long
For i = 1 To Worksheets.Count
Sheets(i).Protect userinterfaceonly:=True, Password:="Köln"
Sheets(i).EnableOutlining = True
Sheets(i).EnableAutoFilter = True
Next i
End Sub
Gruß Thomas