Gruppe
Feature
Bereich
Bedingt
Thema
Zellinnenfarbe bei Eingabe eines Sonntags verändern
Problem
Wie kann ich veranlassen, daß sich die Zellinnenfarbe bei Eingabe eines Sonntagsdatums automatisch verändert?
Lösung
Formel in der bedingten Formatierung: =WOCHENTAG(A1)=1
StandardModule: basMain
Sub SetColor()
ActiveWorkbook.Colors(41) = RGB(112, 144, 122)
Range("A1:A20").Interior.ColorIndex = 41
End Sub