Mein bisheriger Code:
Private Sub ListBox1_Click()
i = cbMonat.ListIndex + 1
txtBuchung = DateSerial(cbJahr, i, 1)
End Sub
Nun möchte ich aber, dass wenn der Erste auf einen Samstag fällt, dass das Datum in der TextBox - txtBuchung - um 2 weiter gezählt wid, also der Dritte des Monats als Ergebnis erscheint und wenn Sontag ist um Eins weiter gezählt wird. Wie kann ich das bewerkstelligen? Danke im Voraus!
Gruß Frank H.