wahrscheinlich stell ich mich gerade blöde an, aber ich erreiche nicht das, was ich will:
Private Sub CbBMI1_Click()
Dim s
s = Application.InputBox ("Alter eingeben in Jahren, muss > 18 sein!!")
If txtAlter2.Value
Das Ganze ist auf einer UF; zum einen kommt die Inputbox auch, wenn txtAlter2.Value größer als 10 ist, zum anderen wird der Wert nicht in txtAlter2.Value geschrieben.
Vielen Dank im Voraus
Werner