Visual Basic para Aplicaciones - Entrar en Cuadro de Texto

Life is soft - evento anual de software empresarial
 
Vista:
Imágen de perfil de FernandoML
Val: 20
Ha aumentado 1 puesto en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Entrar en Cuadro de Texto

Publicado por FernandoML (11 intervenciones) el 27/04/2018 09:03:37
Hola a todos:

Tengo un problema con una hoja de excel que estoy realizando, el problema es el siguiente:
Dentro de una hoja de excel inserto un cuadro de texto (ActiveX) para que el usuario pueda insertar texto, el problema es que a la hora de insertar codigo, no encuentro la manera que el cursor se posicione en ese cuadro de texto.

Mi intención es que cuando se abra el libro o cuando se cumpla una condición, el cursos se posicione dentro de este cuadro de texto llamado "txtNumeroSerie",

Muchas Gracias y un Saludo a todos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana
Val: 1.105
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Entrar en Cuadro de Texto

Publicado por Antoni Masana (377 intervenciones) el 27/04/2018 11:13:13
No se muy bien que quieres hacer pero esto te puede ayudar:

1
2
3
4
5
6
7
Public Sub delete_picture()
    Dim Shp As Shape
 
    For Each Shp In ActiveSheet.Shapes
        If Shp.Name = "txtNumeroSerie" Then Shp.Select
    Next
End Sub

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de FernandoML
Val: 20
Ha aumentado 1 puesto en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Entrar en Cuadro de Texto

Publicado por FernandoML (11 intervenciones) el 28/04/2018 09:19:43
Hola Antoni:

A ver si me explico. Dentro de un formulario para posicionarme dentro del textbox usamos (setfocus ej: Textbox1.SetFocus)

Pero cuando inserto un control activex (textbox) dentro de una hoja esa opción no está y si uso Select lo que hace es seleccionar todo el textbox pero el cursor no se posiciona dentro.

No se como hacer para posicionar el cursor dentro del textbox.

Muchas gracias y un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de FernandoML
Val: 20
Ha aumentado 1 puesto en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Entrar en Cuadro de Texto

Publicado por FernandoML (11 intervenciones) el 28/04/2018 12:18:32
Hola a todos

Ya encontre la solución el código que he usado es el siguiente por si os sirve.

Hoja1.txtNumeroSerie.Activate

Muchas gracias por la ayuda Antoni
Tema Resuelto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar