ich habe in einem Tabellenblatt in einer Spalte die Tage eines bestimmten Monats stehen . Gibt es eine Möglichkeit dass
automatisch alle Samstage, Sonntage, beweglichen und festen Feiertage in rot dargestellt werden ?
Danke und Grüsse
Joerg
Private Sub Workbook_Open()
For I = 2 To 32
If Cells(I, 2).Value = "So" Then
Range(Cells(I, 1), Cells(I, 5)).Font.ColorIndex = 3
Else: Range(Cells(I, 1), Cells(I, 5)).Font.ColorIndex = 11
End If
Next
End Sub