Imprimir pdf

muyayito · el 31 de octubre

Buenas al foro.

Con esta macro relleno unos formularios en pdf desde excel, pero lo guarda como pdf que se pueden editar los formularios, y busco la forma o bien, de imprimir en pdf o que no sse pueda editar.

Ojo, para que funcione hay que tener el adobe pro .

PD: No me deja subir el pdf por tamaño. Si alguien quieres se lo paso por privado.

Libro1.xlsm

Israel Cassales · el 31 de octubre

Hola.

No tengo Adobe PRO pero una idea y como veo que estas usando JSO podrías agregar un JavaScript y convertir las páginas del PDF a solo lectura utilizando this.flattenPages() ya luego se guarda y se cierra.

Dim jsSave As String
        jsSave = "this.flattenPages();" & vbCrLf & "this.saveAs({cPath: '" & stRutaGuardadoPDF & "', bCopy: true});" & vbCrLf & "this.closeDoc();"
        objJSO.Execute (jsSave)

' Y cerramos la aplicación (Acrobat) para finalizar
        objAcrobatApp.Exit

Haz una prueba.

Saludines

muyayito · el 31 de octubre

hace 1 hora, Israel Cassales dijo:
objJSO.Execute (jsSave)

Hola @Israel Cassales y gracias por responder.

Me da fallo en esta línea (El objeto no admite esta propiedad o método)

Editado el el 31 de octubre por muyayito

Israel Cassales · el 31 de octubre

Vaya, entonces podrías intentar otra alternativa para convertirlos en sólo lectura, es probable que haya otras pero una opción diferente que conozco sería usar la propiedad ExecMenuItem para "flatear" el documento y asegurarse de que no sea editable:

' (convertir en solo lectura)
objAcrobatAVDoc.BringToFront objAcrobatApp.MenuItemExecute "SaveAs"

muyayito · el 1 de noviembre

Nada, no soy capaz.

El número de argumento es incorrecto o la asignación de propiedad no es válida.

Israel Cassales · el 1 de noviembre

Lamento leer eso, eran el par de cosas que conozco, al menos la consulta sigue abierta y es posible que recibas ayuda adicional de algún Maestro o miembro avanzado del foro.

Si se me ocurre algo adicional te lo comparto.

Abraham Valencia · el 2 de noviembre

Hola ¿y si comprimes el pdf como zip? ¿pasa igual los 2 mb? ¿no te deja adjuntar así?

muyayito · el 3 de noviembre

En 2/11/2024 at 14:24 , Abraham Valencia dijo:

Hola ¿y si comprimes el pdf como zip? ¿pasa igual los 2 mb? ¿no te deja adjuntar así?

No me deja de mas de 102,4 kb.

https://mega.nz/file/nBAl2LzB#IYeKO_-QZWDbE87XYH7CHpXtuCv3di9b1ppMsV0i2n0

Editado el el 3 de noviembre por muyayito

muyayito · el 4 de noviembre

En 2/11/2024 at 14:24 , Abraham Valencia dijo:

Hola ¿y si comprimes el pdf como zip? ¿pasa igual los 2 mb? ¿no te deja adjuntar así?

No me deja mas de 102,04 kb. He subido un enlace de mega pero esta pendiente de aprobación de un admin.

Abraham Valencia · el 5 de noviembre

Hola, estoy de viaje, la laptop que tengo aquí no tiene Acrobat PRO, tendré acceso a la mía recién el fin de semana; si aún nadie te dio una alternativa, lo veo.