Hallo zusammen,
ich komme mit einer Forumlar IF-Anweisung nicht zurecht. Es wird mir ein "Sytaxfehler" angezeigt aber ich habe offensichtlich ein Brett vor dem Kopf.
ActiveCell.Offset(0, 18).Select
ActiveCell.FormulaR1C1 =
"=IF(RC[-18]<>0,SUM(RC[-15]:RC[-1])-RC[4]-RC[6],"""")"
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.NumberFormat = "#,##0"
.Font.ColorIndex = 0
.FormatConditions.Add Type:=xlCellValue, _
Operator:=xlNotEqual, _
Formula1:="0"
.FormatConditions(1).Interior.ColorIndex = 36
End With
Esd mache ich hier verkehrt????
Gruß, rivasol
|