Habe einen Jahreskalender.
Leider komme ich bei Case "So" & Case "R" nicht weiter.
Es sollte alles das mit Zelle.Interior.ColorIndex = 36 eingefärbt wird, auch die Schrift mit Font.ColorIndex = 5 eingefärbt werden.
Könnte mir bitte jemand weiterhelfen ? Habe die Datei mal hochgeladen.
Danke & Gruß
Heinz
https://www.herber.de/bbs/user/62648.xls