Recent content by Hubert
-
H
How to move the cursor to the end of a text box in a Keydown event
Good morning, friends of the forum, I solved it by adding a KeyDown: Private Sub txtSearch_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeySpace txtSearch = txtSearch + " " KeyCode = 0 End Select txtSearch.SetFocus Me.txtSearch.SelStart = Len(txtSearch.Text) End Sub- Hubert
- Post #8
- Forum: Modules & VBA
-
H
How to move the cursor to the end of a text box in a Keydown event
Buenos dias amigos del foro, lo solucione agregando un KeyDown: Private Sub txtSearch_KeyDown (KeyCode como entero, Shift como entero) Seleccionar código clave de caso Caso vbKeySpace txtBuscar = txtBuscar + " " Código clave = 0 Finalizar Seleccionar txtSearch.SetFocus Me.txtSearch.SelStart =...- Hubert
- Post #7
- Forum: Modules & VBA
-
H
SelLength and spaces
Good morning, friends of the forum, I solved it by adding a KeyDown: Private Sub txtSearch_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeySpace txtSearch = txtSearch + " " KeyCode = 0 End Select txtSearch.SetFocus Me.txtSearch.SelStart =...