Formel

Forumthread: Formel
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Formel

Formel

18.11.2005 14:22:34

achim

Hallo Excel Freunde
bekomme immer wieder eine fehlermeldung
Was ist daran falsch?
Sheets("Einteiler").Activate
Range("Q2:Q2000").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=WENN(NICHT(ISTLEER(Q2));WAHR;FALSCH)"
Selection.FormatConditions(1).Interior.ColorIndex = 19
danke gruß
achim h.

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Formel

18.11.2005 14:28:26

Frank
AW: Formel

18.11.2005 14:59:05

achim.h

AW: Formel

18.11.2005 14:28:26

Frank

Hallo Achim,
bei mir funktionierts (vorausgesetzt, ich fasse das ganze in eine Routine ein):


Sub Test()
Sheets("Einteiler").Activate
Range("Q2:Q2000").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, _
Formula1:="=WENN(NICHT(ISTLEER(Q2));WAHR;FALSCH)"
Selection.FormatConditions(1).Interior.ColorIndex = 19
End Sub

Wann und welche Fehlermeldung erhälst Du?
Gruß Frank

AW: Formel

18.11.2005 14:59:05

achim.h

Hallo Frank
ich versuche mal das was du auch gemacht hast und zwar
mit Application.Run.
#
danke für dei rückmeldung
gruß
achim h.