Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Visual Basic Avanzado - macro para imprimir la pantalla y copiar en word

Vista:
Me gusta: Está pregunta es útil y esta clara
0
No me gusta: Está pregunta no esta clara o no es útil
 
Asunto:

macro para imprimir la pantalla y copiar en word

Autor:alvaro (7 intervenciones)
Fecha:01/07/2005 09:53:14
Hola amigos, tengo un problemilla con una macro que estoy haciendo, resulta que con un programa lo que quiero es abrir un documento con cualquier formato e ir dando pantallazos y cada pantallazo que doy lo pego en word, luego avanzo la página del documento original y sigo con ello hasta que finalice.
Bien, el problema está en que el código para dar el pantallazo (linea 1) se ejecuta muy rápido, pero el de pegar la página en word (linea 4) tarda mucho más, entonces llega un momento en que va más rápido el copiar que el pegar y se salta páginas, pues bien, ahí va la pregunta:
¿hay alguna manera, algún codigo para decirle al programa que pare durante x segundos, o que hasta que no acabe de pegar la página del portapapeles en word no pase a la siguiente linea (la 5 en este caso)?

1 keybd_event vbKeySnapshot, 1, 0&, 0&
2 DoEvents
3 AppActivate msword
4 SendKeys "^v", True
5 Selection.InsertBreak Type:=wdPageBreak

Muchisimas Gracias a todos y tengan un buen día.
Responder
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:macro para imprimir la pantalla y copiar en wor

Autor:SuNcO (209 intervenciones)
Fecha:01/07/2005 21:42:02
Puedes hacer este truco :

Primero pegar la imagen y hacer un Clipboard.clear para borrar lo que contiene, despues revisas si el clipboar aun no se limpia con un ciclo Do que contenga Clipboard.GetData(2) si te da False entonces es que ya no hay imagen y ya puedes capturar la siguiente

En teoria funciona, no se en la realidad =P
Comentar