eigentlich sollte es ganz einfach sein, ich weiß aber nicht wie:
Hier mein Code für die UserForm:
Private Sub UserForm_Click()
Private Sub CommandButton1_Click()
Sheets("Tabelle1").Range("A1") = TextBox1.Value
Sheets("Tabelle1").Range("A2") = TextBox2.Value
Unload Me
End Sub
In TextBox1 gebe ich z.B. 2010 und in TextBox2 z.B. 2014 ein. Beide Zahlen stehen für die Jahreszahlen von z.B. 2010 bis 2014!Folgendes wollte ich umsetzen:
1.) In A1 soll das "echte" Datum 01.01.2000 (also immer der 1.1.) und in A2 31.12.2014 (also immer der 31.12.) eingetragen werden.
2.) Es sollen in den beiden TextBox(en) nur Zahlen zwischen Jahr(heute())-8 und Jahr(Heute())+1 möglich sein.
Besten Dank und Servus, Walter