Comment imprimer pdf à partir de Visual Basic

Instructions

1. Ouvrez votre éditeur de VB dans un document Microsoft en cliquant sur "Outils", "Macros", "Visual Basic Editor."

2. Tapez le code suivant dans l'éditeur:

   Sous OpenPDF ()

   Dim strPDFFileName As String

   strPDFFileName = "C: examplefile.pdf"

   ('Cette fonction suivante vérifie si le fichier est pas déjà ouvert)

   Si Non FileLocked (strPDFFileName) Ensuite,

   
   
   
   
   

   (Si elle retourne Faux, puis continuer à ouvrir le fichier PDF)

   Documents.Open strPDFFileName)

   Fin si

   End Sub

   Remplacer "strPDFFileName" avec le nom complet de votre document PDF. Remplacer "C: examplefile.pdf" avec l'emplacement du répertoire de votre document.

3. Tapez le code suivant pour préparer votre fichier PDF pour l'impression:

   Sous ImprimerPDF (strPDFFileName sous forme de chaîne)

   Dim sAdobeReader as String

   
   
   

   sAdobeReader = "C: Program Files Adobe Acrobat 6.0 lecteur AcroRd32.exe"

   RetVal = Shell (sAdobeReader "/ P" Chr (34) sStrPDFFileName Chr (34), 0)

   End Sub

4. Entrez le code ci-dessous pour enfin imprimer votre document PDF:

   Sous CommandButton_Click ()

   OpenPDF Appel

   ImprimerPDF Appel

   End Sub