Textbox bestimmen die aktiv ist beim öffnen der UserForm

Question

Wie kann ich bestimmen, welche TextBox beim öffnen der UserForm automatisch immer die aktive ist?

Sub Dia()
frm_Daten.Show
frm_Daten.TextBox6.SetFocus
End Sub

funktioniert
aber wenn ich den Befehl noch dazu nehme, dass die UserForm beim öffnen der Datei automatisch startet, komme ich nicht auf die TextBox6, es ist dann stets die TextBox1 aktiv. Warum?


Private Sub Workbook_Open()
Call Dia
End Sub

Am liebsten würde ich die Grundeinstellung so anpassen, dass immer die Textbox6 die erste ist die angesprochen wird, sobald die UserForm gestartet wird. Wenn das überhaupt möglich ist.

Danke für jede Hilfe die ich erhalte

Answer 1

Hallo,

ändere den Code für Workbook_Open wie folgt:

Private Sub Workbook_Open()
frm_Daten.Show
End Sub

Dann füge in das VBA-Projekt der Userform ein Userform_Activate-Code ein:

Private Sub UserForm_Activate()
TextBox6.SetFocus
End Sub

Damit sollte dein Problem gelöst sein.

Gruß

M.O.

Answer 2

Hallo M.O.

Danke Dir vielmals für diesen Input. Einen kleinen Fehler hat das Ganze noch, hoffe Du kannst mir hier auch noch helfen.

Der Cursor blinkt zwar in der Textrbox6 aber ich kann nicht gleich darin schreiben, muss erst mir der Maus das die TextBox nochmals anklicken, damit ich sehe was ich darin schreibe
Klicke ich die TextBox6 nicht an, sehe ich nicht was ich schreibe
Wie kann ich das beheben?

Answer 3

Hallo,

also bei mir funktioniert der gepostete Code einwandfrei. Ich kann sofort in die ausgewählte Textbox schreiben.

Wo hast du den Code für UserForm_Activate eingefügt? Dort wo der Code z.B. für die Buttons der Userform steht?

Gruß

M.O.