sendkeys

03/06/2010 - 00:40 por LFLN | Informe spam
hola gente, diseñe un UserForm en Ecxel 2003 con visual basic 6.3 al cual le
adicione un commandbutton y a este le doy la instrucción de sendkeys, mas no
ejecuta la acción la instrucción la coloque asi:
Private Sub Dale_Click()
SendKeys "{esc}"
SendKeys "+{Right 15}"
End Sub

X favor Alguien puede decirme que estoy haciendo mal, o como puedo
solucionar este asunto.

Gracias anticipadas
 

Leer las respuestas

#1 Héctor Miguel
03/06/2010 - 22:09 | Informe spam
hola, !

... un UserForm en Ecxel 2003 con visual basic 6.3 ... un commandbutton
... la instruccion de sendkeys, mas no ejecuta la accion la instruccion la coloque asi:
Private Sub Dale_Click()
SendKeys "{esc}"
SendKeys "+{Right 15}"
End Sub
... que estoy haciendo mal, o como puedo solucionar este asunto.



no funciona debido a que las pulsaciones de teclas las envias a la ventana activa
(o sea, al formulario donde no tiene efecto pulsar {shift} + 15 veces {right}) :-((

cambia a la siguiente instruccion y te funcionara mas transparente:

ActiveCell.Resize(, 15).Select

saludos,
hector.

Preguntas similares