Je cherche =E0 compter le nombre de fois qu'appara=EEt un mot=20
ou groupe de mots dans un document. Je pense qu'il faut=20
une macro. Quelqu'un aurait-il d=E9j=E0 cette macro?
Merci d'avance,
Maxence
Maxence wrote: | Bonjour, | | Je cherche à compter le nombre de fois qu'apparaît un mot | ou groupe de mots dans un document. Je pense qu'il faut | une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-) http://faqword.free.fr/articles.php?lng=fr&pgE4
Circé http://faqword.free.fr
| Merci d'avance, | Maxence
Bonjour Maxence
Maxence wrote:
| Bonjour,
|
| Je cherche à compter le nombre de fois qu'apparaît un mot
| ou groupe de mots dans un document. Je pense qu'il faut
| une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-)
http://faqword.free.fr/articles.php?lng=fr&pgE4
Maxence wrote: | Bonjour, | | Je cherche à compter le nombre de fois qu'apparaît un mot | ou groupe de mots dans un document. Je pense qu'il faut | une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-) http://faqword.free.fr/articles.php?lng=fr&pgE4
Circé http://faqword.free.fr
| Merci d'avance, | Maxence
Rebonjour, J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
-----Message d'origine----- Bonjour Maxence
Maxence wrote: | Bonjour, | | Je cherche à compter le nombre de fois qu'apparaît un mot
| ou groupe de mots dans un document. Je pense qu'il faut | une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-) http://faqword.free.fr/articles.php?lng=fr&pgE4
Circé http://faqword.free.fr
| Merci d'avance, | Maxence
.
Rebonjour,
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
-----Message d'origine-----
Bonjour Maxence
Maxence wrote:
| Bonjour,
|
| Je cherche à compter le nombre de fois qu'apparaît un
mot
| ou groupe de mots dans un document. Je pense qu'il faut
| une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-)
http://faqword.free.fr/articles.php?lng=fr&pg=454
Rebonjour, J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
-----Message d'origine----- Bonjour Maxence
Maxence wrote: | Bonjour, | | Je cherche à compter le nombre de fois qu'apparaît un mot
| ou groupe de mots dans un document. Je pense qu'il faut | une macro. Quelqu'un aurait-il déjà cette macro?
Mais bien sûr !!! Dans la faq, on trouve tout !!! ;-) http://faqword.free.fr/articles.php?lng=fr&pgE4
Circé http://faqword.free.fr
| Merci d'avance, | Maxence
.
-----Message d'origine----- Rebonjour, J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
C'est de l'humour ?
-----Message d'origine-----
Rebonjour,
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
-----Message d'origine----- Rebonjour, J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
C'est de l'humour ?
Anacoluthe
Bonjour !
'' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _ MatchCase:úlse, MatchWholeWord:=True) = True Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
Bonjour !
'anonymous@discussions.microsoft.com' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro
de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot()
Count = 0
searchtext = InputBox("Entrer le mot à compter :")
With ActiveDocument.Content.Find
Do While .Execute(FindText:=searchtext, Format:úlse, _
MatchCase:úlse, MatchWholeWord:=True) = True
Count = Count + 1
Loop
End With
MsgBox searchtext & " a été trouvé " & Count & " fois"
End Sub
Quant à la deuxième, elle compte le mot "???????" !!!
Il faut donc l'adapter ou utiliser la InputBox de la
première....
Anacoluthe
« Il est plus facile de copier que de penser. »
Wallace STEVENS
J'ai récupéré les eux macros destinées à compter les mots. La première, quand je l'exécute, m'affiche une erreur de synthaxe. La deuxième affiche toujours 0!!! Merci de ton aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _ MatchCase:úlse, MatchWholeWord:=True) = True Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
Maxence
-----Message d'origine----- Bonjour !
'' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _
MatchCase:úlse, MatchWholeWord:=True) = True
Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
.
-----Message d'origine-----
Bonjour !
'anonymous@discussions.microsoft.com' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les
mots.
La première, quand je l'exécute, m'affiche une erreur
de
synthaxe. La deuxième affiche toujours 0!!! Merci de
ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro
de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot()
Count = 0
searchtext = InputBox("Entrer le mot à compter :")
With ActiveDocument.Content.Find
Do While .Execute(FindText:=searchtext,
Format:=False, _
MatchCase:=False, MatchWholeWord:=True) =
True
Count = Count + 1
Loop
End With
MsgBox searchtext & " a été trouvé " & Count & " fois"
End Sub
Quant à la deuxième, elle compte le mot "???????" !!!
Il faut donc l'adapter ou utiliser la InputBox de la
première....
Anacoluthe
« Il est plus facile de copier que de penser. »
Wallace STEVENS
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _
MatchCase:úlse, MatchWholeWord:=True) = True
Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
.
Maxence
Merci anacoluthe... elle marche très bien. Maxence
-----Message d'origine----- Bonjour !
'' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _
MatchCase:úlse, MatchWholeWord:=True) = True
Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
.
Merci anacoluthe... elle marche très bien.
Maxence
-----Message d'origine-----
Bonjour !
'anonymous@discussions.microsoft.com' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les
mots.
La première, quand je l'exécute, m'affiche une erreur
de
synthaxe. La deuxième affiche toujours 0!!! Merci de
ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro
de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot()
Count = 0
searchtext = InputBox("Entrer le mot à compter :")
With ActiveDocument.Content.Find
Do While .Execute(FindText:=searchtext,
Format:=False, _
MatchCase:=False, MatchWholeWord:=True) =
True
Count = Count + 1
Loop
End With
MsgBox searchtext & " a été trouvé " & Count & " fois"
End Sub
Quant à la deuxième, elle compte le mot "???????" !!!
Il faut donc l'adapter ou utiliser la InputBox de la
première....
Anacoluthe
« Il est plus facile de copier que de penser. »
Wallace STEVENS
Merci anacoluthe... elle marche très bien. Maxence
-----Message d'origine----- Bonjour !
'' nous a écrit ...
J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
MDR :-D ))))
Je rassure tout de suite notre webmistress : la macro de la FAQ que je recopie ci dessous marche bien !!!!!
Sub CompterMot() Count = 0 searchtext = InputBox("Entrer le mot à compter :") With ActiveDocument.Content.Find Do While .Execute(FindText:=searchtext, Format:úlse, _
MatchCase:úlse, MatchWholeWord:=True) = True
Count = Count + 1 Loop End With MsgBox searchtext & " a été trouvé " & Count & " fois" End Sub
Quant à la deuxième, elle compte le mot "???????" !!! Il faut donc l'adapter ou utiliser la InputBox de la première....
Anacoluthe « Il est plus facile de copier que de penser. » Wallace STEVENS
.
Je suis dsl, mais les deux premières que j'ai copiées ne marchaient pas!!! Celle d'anacoluthe fonctionne.
-----Message d'origine-----
-----Message d'origine----- Rebonjour, J'ai récupéré les eux macros destinées à compter les mots.
La première, quand je l'exécute, m'affiche une erreur de
synthaxe. La deuxième affiche toujours 0!!! Merci de ton
aide, Maxence
C'est de l'humour ?
.
Je suis dsl, mais les deux premières que j'ai copiées ne
marchaient pas!!!
Celle d'anacoluthe fonctionne.
-----Message d'origine-----
-----Message d'origine-----
Rebonjour,
J'ai récupéré les eux macros destinées à compter les
mots.
La première, quand je l'exécute, m'affiche une erreur
de
synthaxe. La deuxième affiche toujours 0!!! Merci de
ton