Text in Textbox per Tab markieren

CompuSaar

Grünschnabel
Hallo zusammen,

ich habe ein Problem, dass wahrscheinlich so leicht ist, dass ich deswegen hier noch nichts gefunden habe. Und zwar:

Ich habe mehrere Textboxen und kann diese mit Tab durchschalten. Da ich ständig neue Werte eintragen muss, sollte beim Tab-Druck der Text der Textbox blau unterlegt sein, damit ich direkt eintragen kann und nicht immer mit Del den vorhandenen Text löschen muss.

Vielen Dank für Eure Hilfe
 
Beim Erhalt des Focus wird der Text markiert:
Code:
Sub TextFeld_GotFocus()
   TextFeld.SelStart = 0
   TextFeld.SelLength = Len(TextFeld.Text)
End Sub
 
Zuletzt bearbeitet:
Zurück