Interior.Color
26.11.2006 00:12:29
Thomas
ich erstelle mir mit einem Button eine Kopie meines Tabellenblatt "Eingabe"
Private Sub cmdKopie_Click()
Sheets("Eingabe").Copy After:=Sheets("Eingabe")
End Sub
Jetzt möchte ich diese Funktion gerne für das kopierte Tabellenblatt mit folgendem Kriterium erweitern:
Wenn es verbundene Zellen (im kopierten Tabellenblatt) von D : F gibt, die den Wert 1, 2, 3, 4 oder 5 enthalten,
soll diese Zeile von D : O eine rote Hintergrundfarbe erhalten.
Zeilen bei denen die Spalte D : F nicht verbunden ist bzw. nicht einen der oben genannten Werte enthalten,
sollen nicht formatiert werden.
Für Hilfe vielen Dank!
Gruss,
Norman
Anzeige