Compter les mots identiques dans un texte
Fermé
nestor
-
30 juin 2015 à 09:34
C-Claire Messages postés 4014 Date d'inscription samedi 8 novembre 2014 Statut Membre Dernière intervention 3 octobre 2016 - 30 juin 2015 à 10:14
C-Claire Messages postés 4014 Date d'inscription samedi 8 novembre 2014 Statut Membre Dernière intervention 3 octobre 2016 - 30 juin 2015 à 10:14
A voir également:
- Trouver les répétitions dans un texte word
- Transcription audio en texte word gratuit - Guide
- Espace insécable word - Guide
- Supprimer une page dans word - Guide
- Trouver adresse mac - Guide
- Organigramme word - Guide
1 réponse
C-Claire
Messages postés
4014
Date d'inscription
samedi 8 novembre 2014
Statut
Membre
Dernière intervention
3 octobre 2016
2 232
30 juin 2015 à 10:14
30 juin 2015 à 10:14
Bonjour,
tout dépend de ta version de Word et de la fréquence d'utilisation.
Toutes versions confondues, voici 2 méthodes qui fonctionnent :
Via un Rechercher/Remplacer (CTRL H) : tu tapes le mot à compter dans le champ Rechercher et le même dans le champ Remplacer, tu cliques sur "Remplacer tout" et Word affichera le nombre d'occurrences trouvées.
Avec une version 2010 ou 2013, tu peux faire un Rechercher simple (CTRL F). Dans le volet gauche, tu auras le nombre de correspondances et les mots seront surlignés.
Via une petite macro qui te demande quel est le mot que tu veux compter :
Sub NbOccurrences()
Mot = InputBox$("Quel est le mot recherché ?")
With ActiveDocument.Content.Find
.ClearFormatting
Compteur = 0
Do While .Execute(FindText:=Mot) = True
Compteur = Compteur + 1
Loop
End With
If Compteur = 0 Then
MsgBox "Le mot " & Mot & " n'est pas dans le document !"
Else
MsgBox "Le mot " & Mot & " est cité " & Compteur & " fois dans le document."
End If
End Sub
Pour utiliser la macro, appuie sur ALT F11 pour ouvrir l'éditeur VBA, menu "Insertion", "Module". Copie/colle le code qui précède et ferme l'éditeur.
Dans ton document, appuie sur ALT F8 et sélectionne la macro NbOccurrences dans la boîte de dialogue.
tout dépend de ta version de Word et de la fréquence d'utilisation.
Toutes versions confondues, voici 2 méthodes qui fonctionnent :
Via un Rechercher/Remplacer (CTRL H) : tu tapes le mot à compter dans le champ Rechercher et le même dans le champ Remplacer, tu cliques sur "Remplacer tout" et Word affichera le nombre d'occurrences trouvées.
Avec une version 2010 ou 2013, tu peux faire un Rechercher simple (CTRL F). Dans le volet gauche, tu auras le nombre de correspondances et les mots seront surlignés.
Via une petite macro qui te demande quel est le mot que tu veux compter :
Sub NbOccurrences()
Mot = InputBox$("Quel est le mot recherché ?")
With ActiveDocument.Content.Find
.ClearFormatting
Compteur = 0
Do While .Execute(FindText:=Mot) = True
Compteur = Compteur + 1
Loop
End With
If Compteur = 0 Then
MsgBox "Le mot " & Mot & " n'est pas dans le document !"
Else
MsgBox "Le mot " & Mot & " est cité " & Compteur & " fois dans le document."
End If
End Sub
Pour utiliser la macro, appuie sur ALT F11 pour ouvrir l'éditeur VBA, menu "Insertion", "Module". Copie/colle le code qui précède et ferme l'éditeur.
Dans ton document, appuie sur ALT F8 et sélectionne la macro NbOccurrences dans la boîte de dialogue.
