ich habe eine Userform in der 24 Textboxen sind. Diese sollen nur mit Datumswerten gefüllt werden. Das ganze jetzt aber für 24 Textboxen zuschreiben ist etwas aufwendig... Daher meine Frage ob ihr eine Möglichkeit kennt wie es einfacher geht :)
Die Textboxen schreiben die Werte einem in den Bereich D3:E8 und G3:H8, ich glaub das macht es nicht einfacher :/
Freue mich über jede Hilfe!!!
Danke und Gruß
Private Sub CommandButton1_Click()
If Not TextBox1 = "" Then
If IsDate(TextBox1) = True Then
Sheets("Verweis_1").Range("D3") = CDate(TextBox1.Value)
Else
TextBox1.BackColor = vbRed
End If
Else
End If
End Sub