Comment utiliser VBA pour ouvrir et imprimer un fichier PDF

Visual Basic for Applications (VBA) est le langage de programmation utilisé avec Microsoft Office pour permettre aux applications d’effectuer des tâches dynamiques, dont l’une est l’ouverture et l’impression de fichiers PDF. Pour effectuer cette tâche, vous avez besoin d’une compréhension de base du langage VBA et de l’éditeur VBA qui est installé avec chaque version des programmes Microsoft Office. Ce code peut être utilisé pour n’importe quelle application Microsoft Office.

Ouvrez l’éditeur VBA dans l’application Microsoft Office dans laquelle vous voulez que le code soit entré. Cliquez sur « Fichier » ; « Outils » ; « Macros » ; « Visual Basic Editor » dans une application de Microsoft Office 2003 ou antérieure. Cliquez sur « Developer tab » &gt ; « Visual Basic » dans l’édition 2007 de Microsoft Office.

Cliquez n’importe où dans la fenêtre de code où vous voulez insérer le code.

Ajoutez le code pour ouvrir le fichier PDF. Votre code devrait ressembler à ceci :

Sub OpenPDF() Dim strPDFFileName As String’Edit to add the full filename to the PDF file that you want to open strPDFFileName = « C:examplefile.pdf »‘Cette fonction vérifie si le fichier n’est pas déjà ouvert If Not FileLocked(strPDFFileName) Puis’If it returns False, then continuez d’ouvrir le fichier PDF Documents.Open strPDFFileName) End If End Sub Sub End

Copiez et collez ce code dans votre fenêtre de code. La seule partie du code que vous devrez changer est le chemin complet vers le fichier PDF que vous voulez ouvrir. Remplacez donc le « C:examplefile.pdf » par votre propre chemin d’accès et nom de fichier.

Ajoutez le code pour imprimer le fichier PDF. Le code d’impression est :

Sub PrintPDF (strPDFFileName as string) Dim sAdobeReader as String’Ceci est le chemin complet vers l’application Adobe Reader ou Acrobat sur votre ordinateur sAdobeReader = « C:Program FilesAdobeAdobeAcrobat 6.0ReaderAcroRd32.exe » RetVal = Shell(sAdobeReader &amp ; « /P » &amp ; Chr(34) &amp ; sStrPDFFileName &amp ; Chr(34), 0) End Sub Sub Sub (fin)

La seule partie de ce code qui doit être modifiée est le chemin complet vers Adobe Reader, Acrobat ou n’importe quel lecteur PDF sur votre ordinateur.

Utilisez un déclencheur pour appeler les fonctions. C’est ainsi que le code saura quand l’exécuter. Utilisez le déclencheur que vous voulez ; un formulaire, un bouton, une case à cocher ou tout autre élément du formulaire. Par exemple, utilisez la déclaration « Click » d’un bouton. Lorsque vous cliquez sur le bouton, le document PDF s’ouvre et s’imprime. Le code ressemble à ceci :

Sub CommandButton_Click()’Call the open function first so that the PDF can open avant d’imprimer Call OpenPDF’Now call the print function so that the PDF can be printed CallPDF End Sub SubPDF end

Il suffit de copier la partie centrale du code ci-dessus (entre le Sous et le Sous-Sous-Fin) dans l’élément de formulaire et de déclencher que vous décidez d’utiliser.

Cela peut vous intéresser : 1.