Incrustar pdf en hoja excel

Quiesiera saber como puedo insertar un documento en pdf a una hoja excel por codigo VBA,tengo el codigo para ingresar imagenes pero ahora me solicitan que puedan ser pdf tambien
xllibro.sheets(xllibro.sheets.count).OLEObjects.add(Filename:= rst!path_proforma,Link:=False,Display:= False).select
trate con este codigo pero no me inserta nada me aparece el error 1004.
Ojala me puedan Ayudar.

1 respuesta

Respuesta
1
Es intentado utilizar la grabadora de macros, el código me sale así para que elijas el archivo a insertar:
Sub Inserta_PDF()
ActiveSheet.OLEObjects.Add(ClassType:="AcroExch.Document.7", Link:=False, _
        DisplayAsIcon:=False).Activate
End Sub
Prueba y me cuentas, igual no es lo que quieres hacer.
>Un saludo
>Julio
Hola Gracias por contestar
Si prove con este código, pero el problema es que al darle la ruta del archivo (Filename:= rst!path_proforma) que esta almacenado en una BD, me aparece el error 1004 no se puede insertar el objeto.
Ojala me puedas ayudar con este problema.
Prueba a seguir los pasos utilizando la grabadora de macros, si no es posible insertar el pdf es que no tienes acceso a él. Cambiale de ubicación y prueba, si en la nueva si puedes algo esta interrumpiendo la comunicación con BD.
>Un saludo
>Julio

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas