Jacie a écrit qu’elle avait créé une macro qui définissait le texte sur Time New Roman. Elle voulait changer la macro pour être une bascule entre Times New Roman et Arial Narrow Bold, et se demandait comment faire.

Le moyen le plus simple de le faire dans une macro consiste simplement à vérifier la police utilisée dans le texte sélectionné, puis à suivre les étapes en fonction de ce que vous trouvez. Par exemple, la macro suivante n’agira que si le texte sélectionné est Times New Roman ou Arial Narrow:

Sub ChangeSelectedFont()

Select Case Selection.Font.Name         Case "Times New Roman"

Selection.Font.Name = "Arial Narrow"

Selection.Font.Bold = True         Case "Arial Narrow"

Selection.Font.Name = "Times New Roman"

Selection.Font.Bold = False     End Select End Sub

Il existe cependant une méthode différente, non macro, qui peut avoir du sens.

Pourquoi ne pas utiliser des styles? Vous pouvez définir des styles pour englober les attributs de mise en forme souhaités. Par exemple, vous pouvez définir un style utilisant Times New Roman et un autre utilisant Arial Narrow Bold. Vous pouvez appliquer les styles à volonté, à partir de la barre d’outils, et vous pouvez même rechercher et remplacer à l’aide des styles.

_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 (1300) 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-Toggling_Font_Assignments_in_a_Macro [Basculer les attributions de polices dans une macro].