bedingte Formatierung mit Offset(?)
23.10.2012 14:08:15
Manuela
ich habe ein Makro das mir mit diversen Offset-Aktionen meine Exceldatei formatiert. Dies funktioniert auch alles prima, allerdings bringt mich die bedingte Formatierung zum verzweifeln..
Was möchte ich?
In die aktive Zelle soll folgende bedingte Formatierung erhalten:
=ABS(selektierteZelle)>ZelleRechtsDaneben
ActiveCell.FormulaR1C1 = "=RC[-1]-RC[-2]"
Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=ABS( _
selektierteZelle)>ZelleRechtsDaneben"
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.ColorIndex = 3
End With
ActiveCell.Offset(0, 1).Range("A1").Select
Danke und Gruß,
Manu
Anzeige