Zellen sperren ohne Fehler

[Ralf1101]

Hallo,

habe wieder ein Problem.

in den beiden Anhängen ist einmal das Zeitmakro sowie das Fehlerfenster und einmal die Tabelle deren Zellen ich für die Eingabe sperren möchte (rot markiert).

Wenn ich dann das Tabellenblatt sperre und die Aktualisierung drücke um die Zeit zu starten bekomme ich den Fehler "Debugger"

Wenn mir jemand einen Tip geben kann wie ich diesen Fehler vermeide, wäre ich sehr dankbar.

Grüße,
Ralf

[MisterBurns]

Schreibschutz am Anfang des Makrocodes aufheben mit

Code:

Sheets("DeinBlattname").Unprotect DeinPasswort
'Hier deinen Code einsetzen
Sheets("DeinBlattname").Protect DeinPasswort

[schauan]

Hallo Ralf,

ich glaube, es wäre besser, wenn Du für Zelle A3 das "gesperrt" raus nimmst und den Blattschutz drin lässt.

[MisterBurns]

Schreibe bitte keine persönlichen Nachrichten wenn du Fragen zu einem Thema hast. Dafür sind die Themen selbst da.

Hallo,

vielen Dank für Deine Hilfe, aber verstanden habe ich es leider nicht, weil leider zu wenig von VBA verstehe [img]
Dateiupload bitte im Forum! So geht es: Klick mich!
] .

Könntest du es mir als "dummy" bitte nochmal erklären oder kann ich Dir die Tabelle auch schicken?

An die Stelle wo ich geschrieben habe "Hier deinen Code einsetzen", schreibst du die Zeilen aus Sub ZeigenZeit()

Code:

Sub ZeigenZeit()
Sheets("DeinBlattname").Unprotect DeinPasswort
'Hier die drei Zeilen aus deinem Code einfügen
Sheets("DeinBlattname").protect DeinPasswort
End Sub

Das Wort "DeinPasswort" ersetzt du durch das Passwort, das du für den Blattschutz verwendest. Falls du kein Passwort verwendest, löschst du das Wort einfach.


Alternativ kannst du - wie von André geschrieben - auch einfach die Zelle A3 vom Schutz ausnehmen.

[Ralf1101]

Hallo zusammen,

vielen Dank, es funktioniert jetzt. 
Habe nur nicht verstanden weshalb ich ein Passwort eingeben muss, die Tabelle sperrt sich ja von selber und der Blattschutz lässt sich in der aktiven Tabelle auch nicht aufheben. Nur wenn ich sie einmal schließe und danach wieder öffne ist der Blattschutz wieder raus und sobald ich dann einmal den Aktualisierungsbutten drücke läuft die Zeit wieder und der Schutz ist wieder aktiv.

Gruß,
Ralf