Bonjour,
Cela fait assez longtemps que je n'ai pas fait de macro dans word et je sollicite votre aide.
Dans un document avec mise en forme style H3, j'ai une ligne de ce type :
XXXX Libellé commentaire
Ici je veux recuperer le XXXX qui sont les 4 premiers caractères de cette balise.
A chaque fois sur la ligne juste en dessous, je veux recuperer le nombre après EX.
ZZZ est différent à chaque fois, par contre (EX y est toujours.
Usage ZZZ (Ex 9999)
Au final, je veux une ligne avec 2 infos, dans un fichier ou dans excel avec XXXX et 9999
Je pose la question avant de développer, car je compte faire ce travail dans la journée de vendredi (et peu être un peu ce soir), toute aide ou piste est la bienvenue.
Dans mon esprit, il faut Rechercher la balise H3, ecrire les 4 premiers caractères se positionner sur la ligne en dessous, Rechercher "(EX ", se positionner après et jusqu'a la parenthèse fermante, et l'ecrire.
EDIT1, avec le code ci-dessous je parcours, les titres 3 et j'ai la premiere info qui m'interesse, reste à vérifier que la ligne du desous contient bien "EX " avant de récupérer l'info.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Dim oPara As Paragraph For Each oPara In ActiveDocument.Paragraphs If Left(oPara.Style, 7) = "Titre 3" Then Debug.Print Left(Trim(oPara.Range), 4) End If Next
Partager