ejecutar boton automatico

[mamogo]

hola amigos,
me han pedido una programilla y me gustaria que me aconsejarais.
necesitan que se abra un exe que es un programa de gestion de datos y que se active el boton de copia automatica una vez al dia, naturalmente el exe es un programa al cual yo notengo acceso para modificar el codigo fuente, solo puedo hacerlo externamente.
salu2
gracias

[lokoman]

Hola!!
Puedes intentar el siguiente codigo:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Dim A, RUTA_PROGRAMA as string

A = Shell(RUTA_PROGRAMA, vbNormalFocus)
SendKeys "%E" 'DEBES PASAR LA LETRA DEL CAPTION DEL BOTON. EJEMP. SI EL BOTON SE LLAMA "Copia", ENTONCES PASALE EL VALOR SENDKEYS "%C"
DoEvents
Sleep 2000 'ESTA ES UNA PAUSA DE 2 SEG., SI NECESITAS MAS TIEMPO, LO PUEDES AUMENTAR: 1000=1S, 300000=5 MINUTOS
SendKeys "%({F4})" 'AQUI PASAMOS ALT+F4
End 'TERMINAMOS NUESTRO PROGRAMA
End Sub

[mamogo]

hola LOKOMAN,
con esto puedes activar el boton de un programa externo?
sea cual sea el programa?
salu2
gracias

[lokoman]

Lo probé y me funciona bien. Intentalo y nos cuentas.