wenn ich die UF beenden will wird nicht der Focus auf die Textbox39 gesetzt,
Wieso ?
Hier das Makro:
Private Sub CommandButton1_Click()
'Unload UFHilfeDatum <<< damit auch nicht
UFHilfeDatum.Hide
TextBox39.SetFocus
With TextBox39
.SetFocus
.SelStart = 0
.SelLength = Len(.Text)
End With
walter.OptionButton8.Value = False
End Sub
gruß Walter