Value
18.06.2007 14:39:00
HP
ich möchte mir die ständige definition des "conditional Formatting" sparen und für die ZUweisung des Cell Values eine Abfrage vor folgendes Makro setzen, in der das Feld des Value Wertes abgefragt und dann in unten stehendem Code (anstelle von Y$2) verwendet wird..
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreaterEqual _
, Formula1:="=Y$2"
Selection.FormatConditions(1).Interior.ColorIndex = 12
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=Y$2*0,95"
Selection.FormatConditions(2).Interior.ColorIndex = 45
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _
Formula1:="=Y$2*0,95"
Selection.FormatConditions(3).Interior.ColorIndex = 3
Danke für die Hilfe..
gr/HP