Zellen per VBA formatieren

11/10/2009 - 19:17 von jbo | Report spam
Hallo zusammen,

habe E2007 und möchte per VAB Zellen in Abhàngigkeit von Werten
formatieren.
Ich habe leider im www nichts gefunden was ich anwenden könnte und bin
auch nicht so fit in Excel VBA.

Das ganze soll so aussehen:

Die Werte stehen in Spalte A.

IF A1 = Hans
Then Schrift = Blau
Else Schrift = Schwarz
End IF

Das ganze soll für alle Zellen in Spalte A ausgelöst werden wenn dort
der Wert geàndert wurde und die Zelle verlassen wird.

Ich würde mich über einen Tipp sehr freuen.

Vielen Dank.
 

Lesen sie die antworten

#1 Claus Busch
11/10/2009 - 19:45 | Warnen spam
Hallo Jan,

Am Sun, 11 Oct 2009 10:17:37 -0700 (PDT) schrieb jbo:

Das ganze soll so aussehen:

Die Werte stehen in Spalte A.

IF A1 = Hans
Then Schrift = Blau
Else Schrift = Schwarz
End IF

Das ganze soll für alle Zellen in Spalte A ausgelöst werden wenn dort
der Wert geàndert wurde und die Zelle verlassen wird.



im VB-Editor Doppelklick auf die entsprechende Tabelle und dann folgenden
Code ins Codefenster kopieren:

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("A:A")) Is Nothing Or _
Target.Count > 1 Then Exit Sub

If Target.Value = "Hans" Then
Target.Font.ColorIndex = 3
Else
Target.Font.ColorIndex = xlAutomatic
End If

End Sub


Mit freundlichen Grüssen
Claus Busch
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Ähnliche fragen