VBA: Placer cursor i texbox, der hvor der klikkes med musen
Hej alle,Jeg skal se, om jeg kan stille mit spørgsmål så kort, men stadig forståeligt.
Jeg har en userform, hvori der er en tekstboks. Når en bruger "tabber" eller klikker i den første gang, så skal den markere den grå hjælpetekst, der er deri, således brugeren kan skrive i tekstboksen i stedet.
Det har jeg løst sådan her:
Private Sub Attack1DescriptionTextBox_enter()
With Attack1DescriptionTextBox
.ForeColor = &H80000008
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
Private Sub Attack1DescriptionTextBox_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
With Attack1DescriptionTextBox
.ForeColor = &H80000008
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub
MEN ... Når der så er noget brugerdefineret input, så vil jeg gerne have, at userformen "bare" placerer cursoren der, hvor der klikkes med musen.
Den "behavior" har en tekstboks jo som standard, så jeg tænker det burde kunne lade sig gøre, spørgsmålet er bare hvordan?
Jeg har siddet og fiflet med nogle if/else konstruktioner, men jeg kan simpelthen ikke "knække koden" til, hvordan jeg får den til at "vende tilbage til" sin normale behavior, når først jeg har defineret den anden ovenfor.