Chercher une chaine de caractère dans un document word

Question

Bonjour, je souhaiterais créer une macro parcourant l'ensemble d'un document word en y cherchant des chaines de caractères. J'ai vu qu'il y avait des sources dans le cas d'utilisation de tableaux mais moi je voudrais parcourir l'ensemble des lignes ou des paragraphes. Le document que je dois traiter est généré automatiquement et n'utilise pas de tableaux dans la mise en forme, d'ou mon souci. J'espère que quelqu'un aura une idée. Cà pourrait être un truc du genre: For Each monParagraphe In ActiveDocument.Paragraphs If InStr(??????????????????,, "DevTime") <> 0 Then noTests = noTests + 1 ElseIf InStr(??????????????????, "Description") <> 0 Then 'si la cellule contient "Objectifs" nbDesc = nbDesc + 1 ElseIf InStr(??????????????????, "Etape") <> 0 Then 'si la cellule contient "Procédures " noTestStep = 1 End If Next monParagraphe MsgBox "Contrôle : Nb tests= " & CStr(ActiveDocument.Tables.Count) & Chr(13) _ & "Tests=" & noTests & " / Descs=" & nbDesc & " / Steps=" & nb_Steps Merci

cs_Jack · Answer

Salut
Le VB de Word, Excel et consor est du VBA --> Catégorie de la question modifiée

Je ne connais pas grand chose aux appellations du VBA de Word, mais tes ???? représentent le texte dans lequel il faut faire la recherche.
Moi, j'aurais mis  monParagraphe  ou  monParagraphe.Text
Comment est défini (déclaré) monParagraphe ?
Que dit l'aide à propos de cet objet ?

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

fred_surz2002 · Answer

Salut,

Désolé pour l'erreur de catégorie de la question.
Je ne trouve pas de propriété utile dans monParagraphe me permettant d'effectuer ma recherche. Il ne faut peut-être pas parcourir l'ensemble des paragraphes mais autre chose dans ce cas.

Merci

fred_surz2002 · Answer

Je pense qu'avec un monParagraphe.Range.Text je devrais pouvoir m'en sortir!!!
Reste à savoir si le parcours de l'ensemble des paragraphes du document va bien se passer.

Merci

Chercher une chaine de caractère dans un document word

3 réponses

Votre réponse

Discussions similaires