Textfeld - Problem beim Auswähl per Maus

Hallo Forum,

ich stehe vor einem ganz einfachen Problem und finde einfach keine Lösung.

Folgendes Problem:
Wenn ein User irgend ein Datumsfeld anklickt (erscheint ##.##.####) und er kann eine Eingabe machen. Was ich jedoch verhindern möchte ist, dass wenn er nicht an der ersten Stelle in das Feld geklickt hat, sondern „mitten drin“, soll der Cursor automatisch an die erste Stelle des Datumsfeldes springen (–>##.##.####). Dies entspricht dem Verhalten beim drücken der POS1-Taste…

Ich habe es auch schon so probiert:
Sub txt_Datum_Gate2_GotFocus()
Sendkeys „{HOME}“, True
End Sub

Jedoch springt hier der Cursor immer auf das erste Textfeld im Formular und nicht an die erste Position im Textfeld.

Danke im voraus für euere Hilfe…

Gruß,
ProLiant-Crusher

Hallo Forum

Hallo du

Sub txt_Datum_Gate2_GotFocus()
Sendkeys „{HOME}“, True

probier hier statdessen mal:
txt_Datum_Gate2.SelStart = 0 'oder 1, habe es nicht richtig im kopf
txt_Datum_Gate2.SelLength = 0

End Sub

So könnte es klappen…

Gruß,
AlexR

Hallo AlexR,

hat prima geklappt! Ich hatte nur das falsche Ereignis gewählt!

So sieht nun mein Code aus:
Private Sub txt_Gate2_Datum_Click()
txt_Gate2_Datum.SelStart = 0
txt_Gate2_Datum.SelLength = 0
End Sub

Grüßle,
ProLiant-Crusher

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]