Shaune a écrit une macro qui imprime, à un rédacteur PDF, des fiches d’informations sur les produits. Lorsqu’il imprime dans le rédacteur PDF, la macro réinitialise l’imprimante par défaut pour le système sur lequel elle s’exécute, de sorte que lorsque quelqu’un essaie d’imprimer régulièrement (une fois la macro terminée), Word suppose toujours que l’utilisateur souhaite imprimer sur le Rédacteur PDF. Shaune cherche un moyen pour sa macro d’utiliser temporairement le graveur PDF, sans réinitialiser l’imprimante par défaut.

La mauvaise nouvelle, Shaune, c’est que vous ne pouvez pas vous déplacer en réinitialisant l’imprimante. Lorsque vous réinitialisez la propriété ActivePrinter, Word suppose que l’imprimante que vous spécifiez reste l’imprimante active (par défaut) jusqu’à ce que vous la réinitialisez spécifiquement.

La bonne nouvelle est que vous pouvez également lire la propriété ActivePrinter, ce qui signifie que votre macro peut enregistrer n’importe quelle imprimante sélectionnée par la personne avant l’exécution de la macro, puis réinitialiser la propriété ActivePrinter avant de quitter. Le résultat est que l’utilisateur ne remarque jamais que l’imprimante par défaut a été modifiée, car votre macro a détecté les paramètres puis les a modifiés. Cette technique est utilisée de cette manière:

Sub PrinterTechnique()

Dim sCurrentPrinter as String     Dim sPDFwriter as String

' perform whatever tasks need to be done prior to printing ' make sure you also initialize the sPDFwriter string with ' the name of your PDF writer

' save current printer name, then change to PDF writer     sCurrentPrinter = Application.ActivePrinter     Application.ActivePrinter = sPDFwriter

' print document, then go back to the original printer     ActiveDocument.PrintOut     Application.ActivePrinter = sCurrentPrinter

' continue with the rest of your macro

End Sub

_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 (318) s’applique à Microsoft Word 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban de Word (Word 2007 et plus tard) ici:

link: / wordribbon-Temporately_Changing_the_Printer_in_a_Macro [Changement temporaire de l’imprimante dans une macro].