Créer un fichier PDF à partir d’une feuille, Excel VBA

Créer un fichier PDF à partir d’une feuille, Excel VBA

Voici un guide détaillé pour créer un fichier PDF à partir d’une feuille Excel en utilisant VBA :
Étape 1 : Activer l’onglet Développeur
Avant d’écrire et d’exécuter du code VBA, vous devez activer l’onglet Développeur dans Excel. Voici comment procéder :
1. Ouvrez Excel.
2. Cliquez sur l’onglet Fichier.
3. Sélectionnez Options.
4. Dans la fenêtre Options Excel, choisissez Personnaliser le ruban à gauche.
5. À droite, cochez la case Développeur dans la section Onglets principaux.
6. Cliquez sur OK pour activer l’onglet Développeur.
Étape 2 : Ouvrir l’éditeur Visual Basic for Applications (VBA)
Pour ouvrir l’éditeur VBA :
1. Allez dans l’onglet Développeur dans Excel.
2. Cliquez sur Visual Basic pour ouvrir l’éditeur Visual Basic for Applications (VBA), où vous allez écrire votre code.
Étape 3 : Insérer un nouveau module
Pour insérer un module :
1. Dans l’éditeur VBA, cliquez sur Insertion dans le menu.
2. Sélectionnez Module. Cela crée un nouveau module dans l’éditeur où vous pourrez écrire votre code VBA.
Étape 4 : Écrire le code VBA
Voici un exemple de code VBA qui vous permettra de créer un fichier PDF à partir d’une feuille Excel :

Sub CreerPDF()
    Dim ws As Worksheet
    Dim pdfFileName As String
    ' Référence à la feuille active
    Set ws = ThisWorkbook.ActiveSheet
    ' Définir le chemin et le nom du fichier PDF
    pdfFileName = "C:\Users\VotreNom\Documents\ExcelVersPDF.pdf"
    ' Exporter la feuille sous format PDF
    ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfFileName, Quality:=xlQualityStandard
    ' Alerte indiquant que le PDF a été créé
    MsgBox "Le PDF a été créé avec succès à : " & pdfFileName, vbInformation
End Sub

Explication du code :

• Dim ws As Worksheet : Cette ligne définit une variable ws pour stocker la référence à la feuille que vous souhaitez exporter en PDF.
• Dim pdfFileName As String : Cette ligne définit une variable pdfFileName pour stocker le chemin et le nom du fichier PDF.
• Set ws = ThisWorkbook.ActiveSheet : Cette ligne référence la feuille active (la feuille sur laquelle vous travaillez).
• pdfFileName = "C:\Users\VotreNom\Documents\ExcelVersPDF.pdf" : Cette ligne définit le chemin où le fichier PDF sera sauvegardé. Remplacez VotreNom par votre nom d’utilisateur ou le chemin de dossier souhaité.
• ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfFileName, Quality:=xlQualityStandard : C’est la commande qui exporte la feuille sous format PDF. Le paramètre Type est défini sur xlTypePDF, et Filename est le chemin du fichier PDF. xlQualityStandard garantit que le PDF sera créé avec une qualité standard.
• MsgBox « Le PDF a été créé… » : Cette ligne affiche une boîte de dialogue pour informer l’utilisateur que le PDF a bien été créé, avec le chemin du fichier.

Étape 5 : Exécuter la macro
Pour exécuter la macro :
1. Appuyez sur F5 dans l’éditeur VBA ou retournez dans Excel et exécutez la macro depuis l’onglet Développeur en cliquant sur Macros.
2. Sélectionnez la macro CreerPDF et cliquez sur Exécuter.
Étape 6 : Vérifier la sortie
Une fois que la macro a été exécutée, vérifiez le fichier PDF à l’emplacement que vous avez défini dans le code (par exemple : C:\Users\VotreNom\Documents\ExcelVersPDF.pdf). Vous devriez y trouver le fichier PDF créé avec le contenu de la feuille Excel active.
Conseils supplémentaires :

• Personnalisation de la sortie : Vous pouvez personnaliser la sortie du PDF en ajustant les paramètres de la méthode ExportAsFixedFormat. Par exemple, vous pouvez spécifier une plage de cellules à exporter, inclure les sauts de page ou définir la qualité du fichier.
• Gestion des erreurs : Pour rendre le code plus robuste, vous pouvez ajouter un traitement d’erreurs afin de vous assurer que le chemin du fichier est valide et que les éventuels problèmes sont signalés à l’utilisateur.

Ce processus vous permet de créer facilement un fichier PDF à partir de n’importe quelle feuille Excel en utilisant VBA.