Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
528to532
528to532
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farbindex, markieren

Forumthread: Farbindex, markieren

Farbindex, markieren
07.12.2004 11:23:05
Sirko
Hallo,
ich such den VBA Code für folgendes Problem:
Ich will den Zellschutz für alle Zellen, die hellblau sind aufheben. Wie ich den Schutz aufhebe, weis ich. Nur nicht wie ich die Zellen markiere.
Vielen Dank Sirko
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Farbindex, markieren
Ulf
Dim Zelle as Range
For each Zelle in Selection
Zelle.locked = not zelle.interior.colorindex = 5
next
Den Index anpassen
Ulf
@Ulf
IngoG
hallo Ulf,
Deine Lösung hebt zwar den Zellschutz in allen Zellen mit angegebenem Colorindex auf, setzt aber auch in allen anderen zellen den Schutz.
Wenn das nicht gewünscht ist:
Dim Zelle as Range
For each Zelle in Selection
if zelle.interior.colorindex = 5 then Zelle.locked = false
next
oder
Dim Zelle as Range
For each Zelle in Selection
Zelle.locked = (not zelle.interior.colorindex = 5) and(zelle.locked)
next
sollte es auch tun
Gruß Ingo
Anzeige
Stimmt oT
Ulf
o
AW: @Ulf
07.12.2004 12:59:08
sirko
Vielen Dank, es funkioniert.
Sirko
Danke für die Rückmeldung oT
IngoG
.
Anzeige
AW: Farbindex, markieren
07.12.2004 11:31:47
Harald
Hallo Sirko,
if range("a1").interior.colorindex = then
colorindex in vba Hilfe suchen
Gru?
Harald
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige