die gab´s da noch nicht.
Krücke: http://www.excelformeln.de/formeln.html?welcher=241
Boris
Ich mache das in VBA...
Hier der Quellcode für die Tabelle:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If InStr(Target.Address, ":") = 0 Then ' Überprüfen ob mehr als 1Feld Selectiert ist.
If Intersect(Target, Bereich(0)) Is Nothing Then GoTo Ende ' Abbruch, wenn Feld nicht im Zielbereich ist.
IF Target <=> Prüfwert Then
With Target
.Value = UCase(Target.Value) ' Hier wird der Inhalt in Großbuchstaben umgewandelt.
.Value = LCase(Target.Value) ' Hier wird der Inhalt in Kleinbuchstaben umgewandelt.
.Interior.ColorIndex = 3 ' Für Roten Hintergrund.
.Interior.ColorIndex = xlNone ' Um den Hintergrund zurück zusetzten.
.Font.ColorIndex = 2 ' Für Weiße Schrift.
.Font.ColorIndex = 1 ' Für Schwarze Schrift.
.Font.Bold = True ' Für Fettschrifft.
.Font.Bold = False ' Für Normalschrifft.
End With
End If
End IF
End Sub
Gruß
Verminaard The Dragon_Lord_Evil