So, habe jetzt einfach etwas vertauscht:
Select Case Tag
Case 1
Wochentag = "Dienstag"
Case 2
Wochentag = "Mittwoch"
Case 3
Wochentag = "Donnerstag"
Case 4
Wochentag = "Freitag"
Case 5
Wochentag = "Samstag"
Case 6
Wochentag = "Sonntag"
Case 7
Wochentag = "Montag"
Case 8
Wochentag = "Dienstag"
End Select

was besseres fällt mir momentan nicht ein, bei stunde, minute und sekunde läuftsja supper, nur bei tag nicht

aber jetzt gehts ja