Dans le bureau de Mary, ils créent régulièrement des fichiers PDF à partir de documents Word.

Ils le font en utilisant Enregistrer sous et en choisissant d’enregistrer le document en tant que fichier PDF. Cela semble plutôt « clic intensif » à Mary, alors elle se demande s’il existe un raccourci disponible, dans Word, pour enregistrer un document sous forme de fichier PDF.

Vous pouvez aborder cette tâche de deux manières. Tout d’abord, vous pouvez ajouter une commande à link: / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Barre d’outils d’accès rapide]:

  1. Affichez la boîte de dialogue Options Word. (Dans Word 2007, cliquez sur le bouton Office, puis sur Options Word. Dans Word 2010 et les versions ultérieures, affichez l’onglet Fichier du ruban, puis cliquez sur Options.)

  2. Sélectionnez l’option Personnaliser (Word 2007) ou l’option de la barre d’outils Accès rapide (Word 2010 et versions ultérieures) sur le côté gauche de la boîte de dialogue.

  3. À l’aide de la liste déroulante Choisir les commandes dans, choisissez l’onglet Fichier. Cela affiche toutes les commandes qui se trouvent dans l’onglet Fichier du ruban.

(Voir la figure 1.)

  1. Faites défiler la liste des commandes disponibles et choisissez Publier au format PDF ou XPS.

  2. Cliquez sur le bouton Ajouter. La commande est déplacée vers la liste à droite de la boîte de dialogue.

  3. Cliquez sur OK. La nouvelle commande apparaît maintenant dans la barre d’outils d’accès rapide.

Cet outil, lorsque vous cliquez dessus, affiche une boîte de dialogue qui ressemble beaucoup à une boîte de dialogue Enregistrer sous. Tout ce que vous aurez à faire est de fournir le nom que vous souhaitez utiliser pour le fichier PDF et, éventuellement, de choisir un dossier dans lequel vous souhaitez enregistrer le fichier.

Vous pouvez adopter une approche similaire en utilisant une macro, si vous le souhaitez.

La différence est que cette approche affiche en fait la boîte de dialogue Enregistrer sous.

Sub SaveAsPDF1()

With Dialogs(wdDialogFileSaveAs)

.Format = wdExportFormatPDF         .Show     End With End Sub

Comme pour toutes les macros, vous pouvez l’ajouter à la barre d’outils d’accès rapide ou créer une touche de raccourci pour l’invoquer.

Les deux approches décrites jusqu’à présent affichent une boîte de dialogue dans laquelle vous devez saisir un nom de fichier et choisir un emplacement pour le fichier PDF. Si vous souhaitez contourner complètement la boîte de dialogue, une approche de macro différente peut fonctionner pour vous.

Sub SaveAsPDF2()

Dim sName As String     Dim sPath As String

With ActiveDocument         sName = Left(.Name, InStr(.Name, ".") - 1)

sName = sName & ".pdf"

sPath = .Path & "\"



.ExportAsFixedFormat _           OutputFileName:=sPath & sName, _           ExportFormat:=wdExportFormatPDF     End With End Sub

Cette macro détermine le dossier du document actuellement ouvert, puis enregistre le PDF dans ce dossier en utilisant le même nom que le document.

Ainsi, par exemple, si vous travaillez sur un document appelé « MyDoc.docx »,

alors cette macro enregistrera le PDF sous « MyDoc.pdf ». Aucune boîte de dialogue ne s’affiche; le fichier PDF est simplement créé et enregistré.

Si vous préférez que vos fichiers PDF soient enregistrés dans un dossier différent, tout ce que vous avez à faire est d’attribuer le chemin complet de ce dossier à la variable sPath. À titre d’exemple, disons que vous souhaitez que tous vos fichiers PDF soient enregistrés dans un dossier commun. Remplacez simplement cette ligne:

sPath = .Path & "\"

avec une ligne similaire à celle-ci, modifiée pour le chemin souhaité:

sPath = "c:\mypath\pdfs\"

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (12240) s’applique à Microsoft Word 2007, 2010, 2013 et 2016.