mas de una vez necesitaremos que nuestros usuarios, desde excel, puedan visualizar documentos pdf, doc, jpg, etc, etc.
este extremadamente sencillo código que les dejo hace lo siguiente:
primero ejecuta la aplicacion correspondiente (acrobat, word, etc, etc) y luego abre el documento que le indiquemos. util a la hora de no complicarnos la vida en el intento de mostrar archivos que son abiertos por otros programas:
| Código: | Sub Exe()
ejecutar = Shell("C:\Program Files\Adobe\Reader 8.0\Reader\AcroRd32.exe " & "C:\detalle.pdf", vbMaximizedFocus)
end sub
|
detalle: a shell() le paso la ruta en donde se encuentra el .exe de la aplicación, en este caso, acrobar reader. seguramente no se aprecie, pero luego del AcroRd32.exe vá un espacio en blanco y luego cierro comillas. es fundamental dejar ese espacio en blanco. luego concateno la ruta de acceso al archivo, un pdf que tengo en el disco c. por ultimo, y como segundo argumento, le indico que muestre la aplicación en ventana maximizada.
este es un simple ejemplo, pero podrán apreciar que mediante la correcta utilización de las herramientas de vba podemos ofrecerles a los usuario muchas alternativas, como por ejemplo seleccionar el archivo desde un cuadro de diálogo "abrir".
salu2.xls |
