Tabellenschutz in Makro aktivieren & deaktivieren

[stommy7]

Hallo Zusammen!

Ich möchte innerhalb eines Makros auf Tabellenblatt 2 wechseln, dort den Schutz deaktivieren (Passwort: 9270) und anschließend wieder mit dem Passwort 9270 aktivieren.

Kann mir jemand weiterhelfen? Ich habe ein Makro aufgezeichnet, aber es wird dann jedes Mal während der Ausführung des Makros das PW abgefragt.
Funtioniert das auch ohne Abfrage? Das halt einfach das Makro den Schutz aktiviert und wieder deaktiviert und dabei das PW automatisch eingibt oder so ähnlich??

Schonmal Danke im Voraus!

[komma4]

besorge Dir die Referenz des Tabellenblatts und führe die Anweisugen aus:

Code: Alles auswählen

'Schutz mit Passwort entfernen
	oSheet.Unprotect( "9270" )
'Schutz mit Passwort setzen
	oSheet.Protect( "9270" )

Hilft Dir das?

[stommy7]

hmm funktioniert nicht. Fehlermeldung "BASIC-Laufzeitfehler. Objektvariable nicht belegt."

Tippfehler oder sowas?

[Karolus]

Hallo
Vermutlich hast du nicht alles gelesen, was Komma4 dir schrieb:

besorge Dir die Referenz des Tabellenblatts .......

wahrscheinlich:

Code: Alles auswählen

osheet = thisComponent.sheets(1) '2.Tabellenblatt ? (index beginnt bei 0)

Gruß Karo