Normalement, vous ajoutez des guillemets à votre texte à mesure que vous tapez. Cependant, il peut arriver que vous souhaitiez ajouter les guillemets ultérieurement.

Par exemple, lors de l’édition de votre document, vous pouvez sélectionner du texte, puis souhaiter ajouter des guillemets autour du texte sélectionné. Vous pouvez accomplir cette tâche avec la macro suivante:

Sub AddQuotes()

Dim sBegQ As String     Dim sEndQ As String

If Options.AutoFormatAsYouTypeReplaceQuotes Then         sBegQ = Chr(147)

sEndQ = Chr(148)

Else         sBegQ = Chr(34)

sEndQ = Chr(34)

End If

Selection.InsertBefore sBegQ     Selection.InsertAfter sEndQ End Sub

La macro détermine le type approprié de guillemets à utiliser, selon que SmartQuotes de Word est activé ou non. Les citations appropriées sont ensuite placées avant et après la sélection.

_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 (13326) s’applique à Microsoft Word 2007, 2010, 2013, 2016, 2019 et Word dans Office 365. Vous pouvez trouver une version de cette astuce pour le ancienne interface de menu de Word ici:

lien: / word-Adding_Quotes [Ajout de citations].