Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellschutz aktivieren - wie lautet der Syntax?

Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:02:29
Peter
Hallo
In untenstehendem Code brauche ich an stelle der XXXXXXXXXXXXXXXXXXXXX den Befehl für die Deaktivierung des Zellschutzes der Zelle, die in der Spalte Nr. 8 (H) der aktuellen Zeile ist.
Beim Aufzeichnen mit dem Makrorecorder ergibt dies
Selection.Locked = False
Selection.FormulaHidden = False
Wie lautet der Syntax?
Danke für ein Feedback.
Peter

Sub abc()
zNr = 1
Do While zNr > lrow
If .Cells(zNr, 11) <> "" Then
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
else
end if
zNr = zNr + 1
Loop
End With
End Sub

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:20:23
IngGi
Hallo Peter,
so?
Cells(ActiveCell.Row, 8).Locked = False
Gruß Ingolf
AW: Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:33:14
Peter
Hallo Ingolf
Das kommt dem "Wunsch" schon ziemlich nahe. Da ich beim Abspuhlen dieser Codezeile in der Spalte K (Spalte Nr. 11) bin, habe ich mir vorgestellt, dass irgendwie etwas mit offset 3 Spalten nach links in dieser Zeile stehen muss.
Gruss, Peter
Anzeige
AW: Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:44:59
IngGi
Hallo Peter,
dann so:
Cells(ActiveCell.Row, ActiveCell.Column - 3).Locked = False
Gruß Ingolf
AW: Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:53:02
Peter
Hallo Ingolf
Ich war im falschen Film
Es muss wie folgt heissen:
If .Cells(zNr, 11) "" Then .Cells(zNr, 6).Locked = False
Du hast mir aber den entscheidenden Hinweis gegeben.
Vielen Dank!
Peter
Anzeige
AW: Zellschutz aktivieren - wie lautet der Syntax?
07.07.2006 16:53:50
Peter
... und die Frage ist natürlich nicht mehr offen.
Peter
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige