VBA - Restart a Numbered list in a word table from Excel

Hello everyone,

I am currently working on a project to create a standard "Contract Maker", the user enter data in a form, and then it generates a list of clauses useful and pre-written for the contract on several different Worksheet (cell (A1) = Clause Name B1=Clause) in excel. Once all clauses are generated I created a Macro to extract these clauses from Excel to Word under different tables (1 Table = 1 Worksheet). As a result I have several tables with all clauses and everything is working fine. However I am struggling on the formatting of my Numbered List.

On several cells of my Word Table just after the importation from Excel I have number as follows (Text format):
1.
2.
3.

Thanks to the code bellow, those numbers become formatted as a Numbered List
However instead of starting from 1. on each Cell (1.,2.,3. other cell 1.,2.,3.) it continues the numbering (1. 2. 3., other cell 4.,5.,6.).

Do you know how to restart the numbering on each Cell ?

Thank you for you help in advance !
Julien

Please Login or Register  to view this content.

I though about adding a Field (LISTNUM) after the end of each Cell with the code below.
It works but a "0." appears at the end of each Cell text which is not what I want

Please Login or Register  to view this content.