---

Hallo, 

in Excel 2003 habe ich eine Zelle, die "gelb" werden soll, wenn in einer anderen Zelle ein bestimmter Wert auftaucht. Und wenn diese Zelle dann gelb eingefärbt ist, soll direkt in dieser Zelle geschrieben werden können.
Wie realisiere ich das ?

Viele Grüße,  Silke

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Mal so ohne Testen nur hier hingetippert:

Code:

---

if cells(1,2).value = "TEST" then
  cells(1,3).interior.color = 3  '(ist rot, gelb weiß ich nicht auswendig)
  cells(1,3).activate
end if

---

HTH

------------------
Gruß,
runkelruebe          Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

System-Info | Dateianhänge | FAQ-ACAD | CAD.de-Hilfe | Sei eine Antilope

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

 

Zitat:

---

Original erstellt von runkelruebe:
Mal so ohne Testen nur hier hingetippert:
   cells(1,3).interior.color = 3  '(ist rot, gelb weiß ich nicht auswendig)

---

Das stimmt nicht ganz. Es gibt folgende Möglichkeiten:
Interior.Color oder Interior.ColorIndex

Sub test()
If Cells(1, 2).Value = 1 Then
  Cells(1, 3).Interior.Color = vbYellow  '[Tante EDIT](ist geb, vbRed ist rot)[/Tante EDIT]
  'Cells(1, 3).Interior.ColorIndex = 3
  Cells(1, 3).Activate
End If
End Sub

Gruß

------------------
-Axel-    
CROSSFIRE

[Diese Nachricht wurde von arossbach am 15. Feb. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke.

Und in welche Zelle schreibe ich das ?
und wenn ich dann selbst einen Wert eintragen will, dann überschreibe ich das doch wieder....

Das ist doch Visual Basic, oder ?  Wäre das ein Makro ?

Viele Grüße,   Silke

[Diese Nachricht wurde von Silke Boll am 15. Feb. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja, das ist VBA und es ist ein Makro.

Gruß

------------------
-Axel- 
CROSSFIRE

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Silke,

ja - das ist ein Makro! Drück' mal Alt+F11 - Strg+R - (Tabelle wählen) - kopiere den Code ins Worksheet.Change (ungetestet).

Ja, Werte in den Zellen werden überschrieben, Formeln auch. Das war in Excel schon immer so  .

Alternativ: Guck' Dir die bedingte Formatierung an. Ohne Makros, ohne Risiko, ohne Änderung der Sicherheitseinstellung, ohne hektisches Einlesen in VBA, nur mit Excel-Bordmitteln - dafür mit etwas weniger Komfort. Strg+G - Inhalte - Bedingte Formate springt die Zelle an.

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von Paulchen:
... nur mit Excel-Bordmitteln ...

---

seit wann ist VBA kein Bordmittel von Excel mehr ?

Gruß

------------------
-Axel- 
CROSSFIRE

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja, ich meine mich dumpf an sowas erinnern zu können, daß ich genau dieses Problem schon einmal gelöst habe.
Allerdings in Excel 2007.

Mit bedingter Formatierung wäre mir das schon lieber....
Da haben sich Zellen eingefärbt, um mir zu verdeutlichen, daß da (bei dem Fall) ein Wert eingetragen werden muß. Aber mit VBA habe ich das nicht gemacht.

Viele Grüße,  Silke

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Silke,

das lässt sich durchaus umsetzen. Z. B. steht in Zelle A3 eine bestimmte Zahl/Text/wasauchimmer, und C3 wird rot gefärbt. Beispielmappe  ?

@arossbach: Naja, hast schon Recht; ist aber eher eine philosophische Frage. Ich meine mit "Bordmitteln" die in einer üblichen(?), jungfräulichen Installation vorhandenen Formeln, Funktionen und sonstigen Möglichkeiten ohne Hinzunahme von AddIns, Erweiterungen oder gar VBA-Code. (Im schlimmsten Fall weiß der User bei restriktiver Sicherheitseinstellung gar nicht, dass die Mappe Code enthält.) Und zum ordentlichen "Einbau" des Codes "verlässt" du ja das "klassische" Excel?!

------------------
DIN1055.de  |  Lastannahmen für Anwender

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ja, ja, schon gut 
Ist wirklich philosophisch.
Gruß
-Axel-

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

XL2003_bedingte_Formatierung_und_gueltigkeit.zip

Bedingte Formatierung  & Gültigkeit

Wenn Zelle in B4...B10 ungleich "" dann Zelle C4...C10 gelb (Bedingte Formatierung)
und
Gültigkeit =NICHT(ISTLEER(B4)), dabei den Haken bei leere Zellen entfernen, sofern mit
>soll direkt in dieser Zelle geschrieben werden können< nicht ein automatisches aktivieren der Zelle gemeint ist.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke Thomas !

Das hat funktioniert. 

Viele Grüße,  Silke

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo zusammen,
ich habe so ein ähnliches Anliegen:
Wenn in Zelle B4 der Wert "32" steht soll Zelle C4 eine bestimmte Farbe zugewiesen werden. Aber nur wenn der Wert "32" ist. Bei anderen Werten soll nichts passieren. Irgendwie bekomm ich das mit der bedingten Formatierung nicht hin.
Kann mir da jemand einen Tipp geben?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Der Zelle C4 die Bedingte Formatierung =$B$4=32 und bestimmte Farbe zuweisen, fertig.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ausgezeichnet!
Danke! Manchmal ist es soo leicht!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP