<BLOCKQUOTE><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Zitat:</font><HR>Original erstellt von Twiggy:
<STRONG>Tja, ich scheine doch in dieser Hinsicht ziemlich unbegbt zu sein, das was frankman07 vorgeschlagen hat ist ja soweit so gut, aber die Hilfe dazu ist mir nun wirklich keine Hilfe.
Und das mit der if Funktion klappt auch nicht so, wie ich das will.
Ich hab diesen Code bekommen:
dim Rng as Range
set Rng = cells(zeile,spalte)
if Rng.value = "Gesamt" then
Rng.Interior.ColorIndex = Red
Rng.Interior.ColorIndex = 2 ' Alternativ: Palettenindex
endif
und dann die Fehlermeldung Laufzeitfehler 1004
Anwendungs- oder Objektdefinierter Fehler in der Zeile, die ich kursiv geschrieben habe, zumindest war die gelb markiert, als ich auf testen geklickt habe.</STRONG>