Barry a un document Word assez volumineux (environ 50 pages) qui contient des centaines de champs XE utilisés pour construire un index. Il se demande s’il existe un moyen de produire un décompte du nombre de champs XE existants dans le document qui n’implique pas de les compter à la main.

Vous pouvez aborder ce besoin de plusieurs manières. La première consiste à s’appuyer sur les fonctionnalités de recherche et de remplacement de Word. Voici les étapes simples:

  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 une version ultérieure, affichez l’onglet Fichier du ruban, puis cliquez sur Options.)

  2. Sur le côté gauche de la boîte de dialogue, cliquez sur Afficher. (Voir la figure 1.)

  3. Assurez-vous que le texte masqué est affiché dans votre document. (Assurez-vous simplement que la case Caché ou toutes les cases à cocher sont sélectionnées.)

  4. Cliquez sur OK.

  5. Appuyez sur Ctrl + H. Word affiche l’onglet Remplacer de la boîte de dialogue Rechercher et remplacer. (Voir la figure 2.)

  6. Dans la zone Rechercher, saisissez «^ 19 XE» (sans les guillemets).

  7. Dans la zone Remplacer par, entrez « ^ & » (encore une fois, sans les guillemets).

  8. Cliquez sur Remplacer tout.

Word recherche tous les champs XE et affiche le nombre de remplacements effectués. C’est votre décompte souhaité. Le code ^ 19 (à l’étape 6) est le code de caractère de l’accolade de champ d’ouverture qui indique que seuls les champs doivent être mis en correspondance. Vous pouvez, si vous le souhaitez, désactiver maintenant l’affichage du texte masqué.

Il y a quelques points à noter à propos de cette séquence d’étapes.

Premièrement, certaines personnes peuvent penser qu’il manque une étape dans ce qui précède:

en appuyant sur Alt + F9 pour afficher tous les codes de champ dans le document.

En fait, cette étape n’est pas nécessaire car les champs XE sont toujours affichés, tant que le texte masqué est visible. En d’autres termes, appuyer sur Alt + F9 n’affecte pas leur affichage dans un sens ou dans l’autre. Si, cependant, vous comptez un champ autre que le champ XE, vous voudrez afficher les codes de champ avant de suivre les étapes.

Une autre chose à noter est que Word est plutôt indulgent en ce qui concerne le nombre d’espaces pouvant suivre une accolade de champ d’ouverture. Les étapes ci-dessus ne trouvent que les champs XE dans lesquels un seul espace sépare l’accolade de champ d’ouverture (^ 19) et le code XE. Si vos champs contiennent plus d’espaces (ou pas d’espaces), ces instances du champ ne seront pas comptées. Pour cette raison, vous souhaiterez peut-être simplement rechercher XE (sans le code ^ 19 et l’espace) et activer la case à cocher Respecter la casse. Cela fonctionnera tant qu’il n’y a pas d’autres instances de caractères XE en majuscules dans votre document.

Il existe également quelques macros simples que vous pouvez utiliser pour compter les champs XE. Si les seuls champs de votre document sont les champs XE, alors la macro est très simple, en effet:

Sub CountFields()

Dim iCnt As Integer

iCnt = ActiveDocument.Fields.Count     MsgBox "There are " & iCnt & " fields in the document."

End Sub

Cette approche ne fonctionnera cependant pas s’il y a d’autres champs dans votre document. N’oubliez pas: les champs sont utilisés pour placer réellement votre index dans un document. Donc, si vous utilisez des champs XE pour les entrées d’index, vous utilisez probablement un champ pour insérer l’index lui-même. Et, bien sûr, il peut y avoir de nombreux autres champs dans votre document à d’autres fins. Dans cette probabilité, votre macro doit examiner chaque champ et déterminer s’il s’agit d’un champ XE ou non.

Sub CountXEFields()

Dim iCnt As Integer     Dim f As Field

For Each f In ActiveDocument.Fields         If f.Type = wdFieldIndexEntry Then iCnt = iCnt + 1     Next     MsgBox "There are " & iCnt & " XE fields in the document."

End Sub

Cette macro vérifie la propriété Type de chaque objet Field pour s’assurer qu’il s’agit d’un champ XE. Si tel est le cas, il est ajouté au décompte, puis le décompte s’affiche à la fin de la macro.

_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 (11754) 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-Counting_Fields_in_a_Document [Comptage des champs dans un document].