Tecnología

Inicio

Cómo utilizar VBA para abrir e imprimir un archivo PDF

Cómo utilizar VBA para abrir e imprimir un archivo PDF


Visual Basic para Aplicaciones (VBA) es el lenguaje de programación utilizado con Microsoft Office para hacer las aplicaciones realizan tareas dinámicas, uno de los cuales está abrir e imprimir archivos PDF. Para realizar esta tarea, es necesario un conocimiento básico de la lengua y el editor de VBA VBA que viene instalado con todas las versiones de los programas de Microsoft Office. Este código puede ser utilizado para cualquiera de las aplicaciones de Microsoft Office.

Instrucciones

1 Abra el editor VBA en la aplicación de Microsoft Office que desea que el código para que se suscriba. Haga clic en \> \ "Archivo \" "Herramientas \"> \ "Macros \"> \ "Editor de Visual Basic \" en una aplicación de Microsoft Office 2003 o anterior. Haga clic en \ "desarrollador pestaña \"> \ "Visual Basic \" en la edición 2007 de Microsoft Office.

2 Haga clic en cualquier lugar de la ventana de código en el que desea insertar el código.

3 Agregue el código para abrir el archivo PDF. Usted código debe ser algo como esto:

OpenPDF sub ()

Dim strPDFFileName As String
'Edit to add the full filename to the PDF file that you want to open
strPDFFileName = \"C:\\examplefile.pdf\"
'This next function checks to see if the file isn't already open
If Not FileLocked(strPDFFileName) Then
'If it returns False, then continue opening the PDF file
Documents.Open strPDFFileName)

Terminara si
End Sub

Copia y pega el código en tu ventana de código. La única parte del código que va a tener que cambiar es la ruta completa al archivo PDF que desea abrir. Por lo tanto, reemplazar el \ "C: \ examplefile.pdf \" con su propia ruta y el nombre.

4 Agregue el código para imprimir el archivo PDF. El código de impresión es:

Sub PrintPDF (strPDFFileName como cadena)

Dim sAdobeReader as String
'This is the full path to the Adobe Reader or Acrobat application on your computer
sAdobeReader = \"C:\\Program Files\\Adobe\\Acrobat 6.0\\Reader\\AcroRd32.exe\"
RetVal = Shell(sAdobeReader & \"/P\" & Chr(34) & sStrPDFFileName & Chr(34), 0)

End Sub

La única parte de este código que necesita ser cambiado es la ruta completa del Adobe Reader, Acrobat o cualquier lector de PDF en su computadora.

5 Utilizar un disparador para llamar a las funciones. Así es como el código se sabe cuando va a ejecutar. Utilice lo que usted quiere gatillo; una forma, botón, casilla de verificación u otro elemento de formulario. Por ejemplo, utilice el \ "Haga clic en \" declaración de un botón. Cuando se hace clic en el botón, el documento PDF se abrirá y luego imprimir. El código es el siguiente:

Sub CommandButton_Click ()

'Call the open function first so that the PDF can open before printing
Call OpenPDF
'Now call the print function so that the PDF can be printed
Call PrintPDF

End Sub

Sólo tienes que copiar la porción media del código anterior (entre el Sub y End Sub) en el elemento de formulario y el gatillo que decida utilizar.

Consejos y advertencias

  • Si está utilizando la versión 2007 y no ve la pestaña \ "desarrollador \", haga clic en el \ "Office \" botón y luego los \ "Opciones \" situado en la parte inferior del menú. Haga clic en \ "Mostrar ficha Programador en la cinta \" y haga clic en \ "Aceptar \".