La Web del Programador: Comunidad de Programadores
 
    Pregunta:  65562 - COMO ABRIR PDF DESDE BOTON VISUAL BASIC
Autor:  Ignacio Sánchez
Hola tengo montada una aplicación con la macro del editor de Visual Basic que viene en Excel y no consigo que me abra desde mi formulario de VB un archivo formato PDF. Pongo esto:

Private Sub Command1_Click()

ShellExecute Me.hwnd, "open", "C:Archivos de programaManual.pdf", "", "", 4

End Sub

Con códigos parecidos para archivos EXCEL y WORD si me deja abrirlos, pero con el PDF me da error.

Desde el Visual Basic 6.0 si me deja abrir todos los archivos de distintos formatos incluidos el PDF.

Gracias de antemano ;)

  Respuesta:  Ignacio Sánchez
Hola Gonzalo.

He utilizado tu código pero me da salta un error de compilación diciendo que el argumento no es opcional.

He puesto:

ShellExecute hwnd, "Open", ("C:Archivos de programaManual.pdf"), "", 1

Muchas gracias por contestar.

Saludos.

  Respuesta:  Gonzalo Quintana
Hola Ignacio:

Yo utilizo el sigueinte código desde un botón puesto en una hoja de excel y me funciona a la perfección:

Private Declare Function ShellExecute _
Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Private Sub CommandButton1_Click()
ShellExecute hwnd, "Open", (la ruta de tu archivo entre "") , "", 1
End Sub

Espero te sirva...
Saludos,

Gonzalo