L’un des problèmes les plus courants rencontrés par Emily lors de l’édition implique l’insertion de la virgule série dans une liste d’éléments en ligne, avant la conjonction finale entre les éléments de la liste. Le bureau d’Emily impose l’utilisation de la virgule sérielle pour plus de clarté et pour éviter des phrases potentiellement maladroites telles que: «Je dédie ce livre à mes parents, Mère Teresa et Jésus». Cependant, de nombreux écrivains n’aiment pas utiliser cette virgule, alors Emily passe beaucoup de temps à la modifier dans presque tous les paragraphes de texte qu’elle rencontre. Emily note que cela lui faciliterait la vie si elle disposait d’une macro qui rechercherait du point d’insertion à la fin de la phrase actuelle et insérer une virgule avant la prochaine occurrence des conjonctions communes « et » et « ou », mais seulement s’il n’y a pas de virgule déjà là.

Ce à quoi Emily fait référence est connu sous le nom de «virgule sérielle» ou de «virgule Oxford». Son utilisation est débattue depuis des décennies par les grammairiens. (Je ne veux pas entrer dans un débat à ce sujet ici, mais je dirai que l’utilisation d’une virgule Oxford peut améliorer la clarté en ce qui concerne les listes en ligne, comme le note Emily.)

Emily cherche une solution plutôt simple au problème, une solution qui recherchera les conjonctions communes et insérera une virgule, si nécessaire. La meilleure façon de gérer cette situation est d’utiliser une macro, comme elle le note. En voici un qui effectuera la tâche:

Sub SerialComma()

Dim MySelection As Selection

Selection.MoveRight Unit:=wdSentence, Extend:=wdExtend     Set MySelection = Selection     Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = "([!,.?;:]) and "

.Replacement.Text = "\1, and "

.Forward = True         .Wrap = wdFindStop         .Format = False         .MatchCase = False         .MatchWildcards = True     End With     Selection.Find.Execute Replace:=wdReplaceAll     MySelection.Select     With Selection.Find         .Text = "([!,.?;:]) or "

.Replacement.Text = "\1, or "

End With     Selection.Find.Execute Replace:=wdReplaceAll     MySelection.Select     Selection.Collapse End Sub

La macro sélectionne tout d’abord tout du point d’insertion actuel à la fin de la phrase actuelle. Ensuite, à l’aide d’une recherche par caractère générique, il recherche une occurrence du mot «et» qui ne suit pas un signe de ponctuation. S’il le trouve, il remplace l’occurrence par une virgule et le mot « et ». Il effectuera alors une opération de recherche et de remplacement similaire pour le mot «ou».

Cette macro peut, bien sûr, être assignée à une touche de raccourci ou au link: / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Quick Access Toolbar] pour rendre l’ajout de ce type de virgule un jeu d’enfant.

Je reconnais que cette macro peut ne pas fonctionner pour toutes les permutations grammaticales. (L’anglais est plutôt « spongieux » de cette façon.) Il peut être préférable de simplement laisser Word vérifier votre document à votre place et signaler tout ce qu’il met en doute en ce qui concerne la présence de la virgule Oxford (ou son absence). Vous pouvez effectuer cette modification de cette manière si vous utilisez Word 2007, Word 2010 ou Word 2013:

  1. Affichez la boîte de dialogue Options Word. (Dans Word 2007, cliquez sur le bouton Office, puis sur Options Word. Dans Word 2010 ou Word 2013, cliquez sur l’onglet Fichier du ruban, puis sur Options.)

  2. Cliquez sur l’option Vérification sur le côté gauche de la boîte de dialogue. (Voir la figure 1.)

  3. Cliquez sur le bouton Paramètres. Word affiche la boîte de dialogue Paramètres de grammaire. (Voir la figure 2.)

  4. Assurez-vous que l’option «Virgule requise avant le dernier élément de la liste» est définie sur Toujours.

  5. Cliquez sur OK pour fermer la boîte de dialogue Paramètres de grammaire.

  6. Cliquez sur OK pour fermer la boîte de dialogue Options Word.

Si vous utilisez Word 2016 ou une version ultérieure, utilisez plutôt les étapes suivantes:

  1. Affichez l’onglet Fichier du ruban, puis cliquez sur Options.

  2. Cliquez sur l’option Vérification sur le côté gauche de la boîte de dialogue. (Voir la figure 3.)

  3. Cliquez sur le bouton Paramètres. Word affiche la boîte de dialogue Paramètres de grammaire.

  4. Faites défiler vers le bas de la boîte de dialogue pour afficher l’option Conventions de ponctuation. Assurez-vous que la virgule Oxford est sélectionnée. (Voir la figure 4.)

  5. Cliquez sur OK pour fermer la boîte de dialogue Paramètres de grammaire.

  6. Cliquez sur OK pour fermer la boîte de dialogue Options Word.

Le paramètre n’insérera pas la dernière virgule pour vous, mais il détectera les instances où la virgule n’est pas présente.

_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 (9295) 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:

link: / word-Adding_Serial_Commas_in_a_Sentence [Ajout de virgules série dans une phrase].