Impedir el borrado de datos por error al desplazarse por los controles de un formulario

Al desplazarse de un cuadro de texto o un campo memo a otro en un formulario, el texto del control se resalta. Esto hace que no resulte difícil que los usuarios borren accidentalmente el texto presionando una tecla. Utilizando unas pocas líneas de código, es posible mover el punto de inserción a la primera posición del cuadro de texto, minimizando el riesgo de borrado accidental.

Para ello, cree un procedimiento para el evento GotFocus del cuadro de texto. En el procedimiento de evento GotFocus , establezca la propiedad SelLength del cuadro de texto en su propiedad SelStart .

El ejemplo siguiente ilustra cómo hacerlo en un cuadro de texto denominado txtFirstName.

Private Sub txtFirstName_GotFocus() 
 
    Me.txtFirstName.SelLength = Me.txtFirstName.SelStart 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.