Kann man eine aktive Textbox so einstellen das wenn nach einer bestimmten Zeit
keine Eingabe erfolgt das Programm zur nächsten Textbox weiter springt.
Macht im ersten Moment keinen Sinn möchte aber was ausprobieren.
Gruß zum ersten Advent Jochen
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:05"), "weiter"
End Sub
code in modul
Sub weiter()
UserForm1.TextBox2.SetFocus
End Sub
Gruß Timo
Private Sub TextBox1_GotFocus()
Application.OnTime Now + TimeValue("00:00:05"), "weiter"
End Sub
Dieser Code in ein Modul:
Private Sub weiter()
With Sheets("Tabelle1")
.TextBox2.Activate
End With
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen