Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

VBA/Makro Blattschutz für eine Spalte aufheben





Frage

Hallo Leute, ich brauche da mal kurz eure Hilfe. Folgendes ist mein Problem: Ich habe ein Makro geschrieben, mit dem ich bestimmten Zellen Farben zuweisen kann. Am Anfang und am Ende jedes Unterprogramms steht ActiveSheet.(Un)-Protect "?????". Damit ist jede Zelle nicht mehr von Hand formatierbar, es muß immer erst der Blattschutz beseitigt werden. Ich möchte jetzt in die Tabelle eine komplette Spalte für Kommentare einfügen, diese muß von jedermann frei editierbar sein. Wer kann mir da helfen. Welche Zusatz-Codezeile muß ich dazu noch eingeben?

Antwort 1 von M.O.

Hallo,

durch folgende Zeile wird bei Spalte G die Sperrung beim einem Blattschutz aufgehoben:
Columns("G:G").Locked = False

Noch ein kleiner Tipp zum Abschluss:
Oft hilft auch der Makro-Rekorder.

Gruß

M.O.

Antwort 2 von Ulkiger

Hallo M.O.,

irgendwie klappt deine Lösung bei mir nicht!
Wo muß ich denn diese Zeile einfügen. Ich habe diese Zeile überall dort eingefügt, wo ein ActiveSheet.Protect erscheint. Aber trotzdem ist die Spalte nicht editierbar!

Gruß

Antwort 3 von M.O.

Hallo Ulkiger,

du musst die Zeile nach der Zeile einfügen, in der der Blattschutz aufgehoben wird, also nach
ActiveSheet.Unprotect


Dann sollte es gehen.

Gruß

M.O.

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: