Necesito una macro que me genere un PDF pero con contraseña de apertura y de edición

Les comento, tengo una macro que me realiza las colillas de nomina del personal de una forma práctica y ágil, y no solo me las guarda en el servidor en la ruta que le asigno sino que también se la envía a cada usuario. Hasta ahí todo va bien.

'--------------------- Inicio del código que crea el PDF en la ruta POR ---------------

Dim CARPETA

CARPETA = ActiveWorkbook.Path & "\PDF\" & Range("Archivo").Value

ActiveSheet.PageSetup.PrintArea = "$A$1:$AL$76"

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
CARPETA _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

'--------------------- Fin del código que crea el PDF en la ruta POR ---------------

Para darle un poco de "seguridad" a las colillas que envío requiero que los PDF los envié no solo con clave de apertura (la cédula del destinatario), sino que también con contraseña (esa si mía) para evitar que me los editen o copien firmas o logos.

¿Alguien qué me pueda orientar?

Respuesta

[Hola

El método "ExportAsFixedFormat" no tiene una propiedad que permita agregar algún tipo de clave al archivo pdf generado. Un forma de interactuar correctamente sería trabajar con el objeto "Acrobat" y quizás así podría realizarse lo solicitado pero, igualmente hay que programar bastante y conocer bien las herramientas del pdf y como usarlas desde VBA con dicho objeto "Acrobat". Eso sí, hay que saber algo importante: Solo se podrá hacer si se tiene el "Adobe Acrobat Pro" o el "Adobe Acrobat Reader DC" y no otros visores de PDF.

Hay un par de manuales que podrían dar luces pero, insisto, no será tan simple:

Manuales para manejar archivos PDF (API):

http://www.adobe.com/content/dam/acom/en/devnet/acrobat/pdfs/iac_api_reference.pdf

http://www.adobe.com/content/dam/acom/en/devnet/acrobat/pdfs/iac_developer_guide.pdf

Abraham Valencia

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas