Office: (Office 2010) Zelle je nach Farbe sperren/freigeben (bedingte Formatierung)

Hallo zusammen,

um zu verhindern, dass etwas bei der Eingabe vergessen wird, möchte ich eine Eingabemaske erstellen, die nur einen Weg der Eingabe zulässt.

Bisher habe ich über bedingte Formatierungen diesen Weg erstellt. Ist es nun möglich nur Zellen freizugeben, die eine bestimmte Farbe enthalten.

Beispiel: Alle Zellen sind grau, nur A1 ist weiss. -> Wenn A1 = Wert, dann A2 = weiss -> Wenn A2 = Wert, dann A3 = weiss. usw.

Es sollen nur weisse Zellen für eine Eingabe frei sein.

Vielen Dank für eure Unterstützung.
Björn

:)

 

Hallo Björn,

Die Farbe erzeugst du ja per BF, wenn die Zelle einen Wert enthält. Also könnte man ja für die Folgezelle, zB A3, abfragen, ob A1 einen Wert enthält.

Dafür sehe ich 2 Lösungsansätze: VBA oder etwas simpler die Datenüberprüfung von Excel; und hierzu der Vorschlag für A3.

- Zelle A3 auswählen
- Menu Daten / Datenüberprüfung wählen
- Einstellungen / Zulassen = benutzerdefiniert
- Häkchen entfernen bei 'leere Zellen ignorieren'
- Formel: =Nicht(A1=""), für A1 als Vorgängerzelle

Gruß
Aloys

 

Hallo Aloys,

vielen Dank für deine schnelle Hilfe. Der von dir beschriebene Weg funktioniert einwandfrei.
Allerdings habe ich eine ziemlich grosse Tabelle, die sich ausserdem noch durch Makros erweitert. Alle Zellen so einzustellen ist also nur bedingt möglich und wäre eine heiden Arbeit.

Daher brauche ich glaube ich wirklich nen passendes Makro, dass nur Zellen zur Eingabe freigibt, die per BF weiss eingefärbt sind.

Kannst du (oder sonst jemand) mir damit weiter helfen?

Besten Dank
Björn

 

Hallo Björn,

Eine durch BF erzeugte Farbe lässt sich auch per VBA nicht direkt abfragen.

Ich würde eher das Change-Ereignis nutzen, um nach der Eingabe eines Wertes die nächste Eingabezelle anzusteuern und weiß zu färben.

Dazu wären aber folgende Infos von Interesse:
- welche Zellen sind Eingabefelder (ggf allgemein beschreibbar) ?
- die Reihenfolge der Eingabe (Oben nach unten, links nach rechts)
- besteht Blattschutz ?
- sind alle Eingabezellen ungeschützt ?

Gruß
Aloys

 

Ich hatte schon die böse Vorahnung, dass VBA das nicht hinbekommt.

Es sollen (fast) alle Zellen der Tabelle zu Eingabefeldern werden. Jedoch soll dies der Reihenfolge nach passieren, damit der Kollege nicht in Versuchung kommt ein Feld zu überspringen und die Eingabe dann zu vergessen (klingt komisch, ist aber so...).

Beispiel: Nur wenn Feld "Lieferant" = Wert , kann Feld "Rechnungsnummer" ausgefüllt werden. Nur wenn Feld "Rechnungsnummer" = Wert, kann Feld "Rechnungsbetrag" ausgefüllt werden

Traurig, dass ich es so kompliziert machen muss, aber die Kollegen umzuprogramieren, dürfte deutlich schwieriger fallen...

 

Nee,

traurig ist nur, dass derart ignorante Leute auch noch verantwortliche Arbeiten verrichten.

Na ja, ich würde per VBA das ganze Blatt gegen Eingabe schützen. Und falls ich dich richtig verstanden habe: Dann per UserForm für jede Zeile die Eingaben abfragen und auf Logik prüfen. Ist in der Userform alles OK, dann Blattschutz aufheben, Zeile schreiben, Blattschutz setzen.

 

Vielen Dank für dein Hilfe.
ich werds dann wohl auf dem Weg probieren müssen :/