Jump to content

Macro que responda a una ventana emergente al abrir un libro


Recommended Posts

Buenos días;

Mi problema es el siguiente. Abro un libro Excel que me hace saltar una ventana con las opciones Yes/No.

Yo quiero que responda siempre Yes.

He probado con todo (Application.enableevents=false/true, Application.displayalerts=false/true, Application.sendkeys "y") pero no funciona porque la acción de abrir el libro es la que hace saltar la ventana.

Entonces, ¿hay alguna forma de que dentro de la instrucción

 Workbooks.Open (Filename:=ruta, Password:="e3t2b4ci").RunAutoMacros which:=xlAutoOpen [code]

pueda responder Yes a una ventana qué emerge?

Muchas gracias de antemano por vuestro tiempo

Un saludo

Link to comment
Share on other sites

Siento no poder hacerlo... Son bastante confidenciales ambos ( Lo siento porque sé que las normas del foro son claras en este punto y debería subirlas)

Los archivos que abro están además en una unidad de red y no estoy seguro siquiera de poder descargarlos.

Link to comment
Share on other sites

Es una tontería, pero a veces funciona: prueba a enviar la pulsación ANTES de la instrucción que abre el libro.

Acabo de hacer una prueba abriendo un libro que muestra un MsgBox en su evento Workbook_Open, y si envío la pulsación de la tecla s (mi Excel está en español) después de la instrucción para abrir el libro no funciona, pero si la envio justo antes sí. Es decir, algo como:


Sendkeys "y"
Workbooks.Open (Filename:=ruta, Password:="e3t2b4ci").RunAutoMacros which:=xlAutoOpen[/CODE]

Tal como yo lo entiendo (pero puedo estar equivocado), Sendkeys envía la/s pulsación/es a un buffer, del cual se extrae/n por lo primero que admita una acción de teclado.

Suerte

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information

Privacy Policy