Anzeige
Anzeige
Anzeige
Lesedauer 2 Min.

Mein Makro funktioniert nicht, wenn das Blatt geschützt ist - Excel

Ich habe eine Excel-Liste mit Vokabeln erstellt, die ich meinen Kollegen zur Ansicht zugänglich machen möchte. In dieser Liste sind Makros als Suchhilfe angelegt. Wenn ich nun das Blatt mit einem Schutz versehe, funktioniert das Makro nicht mehr. Meldung: «Laufzeitfehler 1004» erscheint. Wie kann ich dieses Problem beheben?
PcTipp
PcTipp
© Quelle: PCtipp.ch

Besten Dank für die Zusendung der Datei zur Ansicht. Fazit: Das Makro versucht die Daten zu filtern, um die gesuchte Vokabel auszugeben. Das Filtern funktioniert jedoch nur in einer ungeschützten Tabelle. Sie müssen also dafür sorgen, dass das Makro vor dem Filtern den Blattschutz aufhebt und das Blatt vor der Beendigung seiner "Arbeit" wieder schützt.

Öffnen Sie den VBA-Editor (ALT+F11) um sich den Code des Makros anzusehen. Setzen Sie dann folgende Zeile irgendwo am Anfang des Makros ein, um den Blattschutz aufzuheben.

ActiveSheet.unprotect

Um das Blatt am Ende des Makros wieder zu schützen, setzen Sie folgende Zeile vor "End Sub" ein

ActiveSheet.protect

Das war's dann schon, vorausgesetzt, Sie haben das Blatt ohne Passwort geschützt. Sollten Sie ein Passwort verwenden wollen, müssen beide Zeilen nach einem Leerschlag mit dem folgendem Text ergänzt werden (Bsp: Passwort=sommer).

password:="sommer"

Kommentare

Sicherheit Cloud Office Software Internet & Sicherheit Software & Tools
Anzeige
Anzeige

Neueste Beiträge

Stromverbrauch und Effizienzpotenziale von Rechenzentren in der Schweiz
2024 betrug der Stromverbrauch der Rechenzentren in der Schweiz 2,1 TWh, was ungefähr 3,6 Prozent des Gesamtverbrauchs entspricht. Bis 2030 wird ein Anstieg des Stromverbrauchs der inländischen Rechenzentren auf 2,5 bis 3,2 TWh erwartet. 
3 Minuten
Echtzeittext - Bundesrat schafft Grundlage für neue Notruffunktion
Der Bundesrat hat mehrere Verordnungen angepasst, um ein sicheres Notrufsystem zu fördern. In Zukunft können Menschen in Notlage die Notdienste von Polizei, Feuerwehr und Sanität per Echtzeittext auf den Smartphones auch schriftlich erreichen. 
3 Minuten
ggs netz übernimmt sämtliche Kommunikationsnetze der GIB-Solutions
Die ggs netz ag übernahm per 1. Mai 2026 sämtliche Kommunikations-netze der GIB-Solutions AG. Mit der Transaktion kommen rund 10’000 Digitalanschlüsse hinzu. Die übernommenen Netze werden künftig über die neu gegründete Tochtergesell-schaft ggs plus ag betrieben.
3 Minuten

Das könnte Sie auch interessieren

Sicherheitstipps
Ist Biometrie sicher?
Viele Anwender nutzen Biometrie, um zum Beispiel das Smartphone per Gesichtserkennung oder das Notebook mittels Fingerscanner zu entsperren. Aber ist das wirklich sicher? Und wo lauern die Fallen?
9 Minuten
Apple-Ecke
Lineár Calendar: das ganze Jahr im Blick
Wer kennt sie nicht, die Jahreskalender im Büro: Sie zeigen einen schnellen Überblick darüber, was in diesem Jahr noch kommen wird.
2 Minuten
28. Apr 2026
Outlook-Tipps
Das neue Outlook
Microsoft hat seine beliebte E-Mail- und Organisations-Software Outlook komplett überarbeitet. Wir zeigen Ihnen Schritt für Schritt, wie Sie die neue Version einrichten, bedienen und optimal auf Ihre Bedürfnisse anpassen.
9 Minuten
10. Apr 2024
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Kommentare