Bonjour à tous,
 
J'ai trouver sur 01net.com une macro word qui permet de compter le nombre de fois qu'une occurence apparait dans Word.
http://www.01net.com/editorial/252 [...] dans-word/
 
Sous word 2003, j'ai donc copier le code suivant :
 
Sub repetition()
Count = 0
searchtext$ = InputBox$("Indiquez   le   mot   ou   la   phrase   à   comptabiliser   :" )
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é utilise à " * Count * " reprise(s)"
End Sub
 
Mais l'execution de la macro fait apparaitre une "Erreur d'exécution '13': Incompatibilité de type"  sur la ligne "MsgBox searchtext$ * ": a été utilise à " * Count * " reprise(s)"".
 
Pourriez-vous m'aidez à trouver l'erreur ?
 
Merci d'avance.

je viens de remplacer les * par des & et cela fonctionne parfaitement
 
Merci