Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
236to240
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
236to240
236to240
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

bedingten Formatierung mit problem

bedingten Formatierung mit problem
27.03.2003 10:16:49
Marc Voelker
Moin Allerseits

Mit untenstehender Formel habe ich ein Problem.
der erste Zeil Funktionier ja auch, aber der zweite teil nicht.
In Spalte "D" steht ein Datum und in Spalte "E" eine Zahl.
Spalte "F" enthält den Status



'Wenn der Status "erledigt" ist, werden die Tage rückwärts eingetragen
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
            "=WENN($F2="erledigt";UND($D2>=H$1;($D2-$E2)    Selection.FormatConditions(1).Interior.ColorIndex = 5

'Wenn der Status nicht "erledigt" ist, werden die Tage vorwärts eingetragen
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
            "=WENN($F2<>"erledigt";UND($D2>=H$1;($D2+$E2)    Selection.FormatConditions(1).Interior.ColorIndex = 3


     Code eingefügt mit Syntaxhighlighter 2.0

Gruß+Dank
Marc


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: bedingten Formatierung mit problem
27.03.2003 11:33:58
Bernd Held

Hallo MArc,

so habe ich es hingekriegt:

Sub bedFormat()
'Wenn der Status "erledigt" ist, werden die Tage rückwärts eingetragen
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=WENN($F2=""erledigt"";UND($D2>=H$1;($D2-$E2)))"
    Selection.FormatConditions(1).Interior.ColorIndex = 5
    
    
'Wenn der Status nicht "erledigt" ist, werden die Tage vorwärts eingetragen
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
            "=WENN($F2<>""erledigt"";UND($D2>=H$1;($D2+$E2)))"
            Selection.FormatConditions(1).Interior.ColorIndex = 3

End Sub

     Code eingefügt mit Syntaxhighlighter 1.14

Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA-Publikationen mit Leseproben(PDF) unter: http://held-office.de



Anzeige
Re: bedingten Formatierung mit problem
27.03.2003 11:39:54
Marc Voelker

Thx

Gruß+Dank
Marc

321 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige