Extraire des données Word via les styles vers un tableau Excel

Bonjour,

J'essaye de récupérer des éléments d'un document Word pour les intégrer dans un fichier Excel comme ci-dessous :

Colonne A Colonne B Colonne C Colonne D

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

Style1 Style2 Style3 Numéro page

En effet, les éléments à récupérer ont des styles différent mais sont à la suite des uns des autres, puis rajouter sur la même ligne la page où ces informations ont été trouvé.

Je voulais adapter le code que @GVIALLES avait créé à l'époque pour extraire des données d'un fichier Word en remplaçant les SHAPES par la commande qui sélectionne les STYLES.

https://forum.excel-pratique.com/viewtopic.php?f=2&t=103948

Cependant, vu mon peu de connaissance en recherche de style et les différentes recherches non concluante sur le web, j'ai un peu de mal à donner suite à mon projet.

Je vous remercie par avance de votre aide