Continue numbering in custom list
Solution 1:
Ref: https://docs.microsoft.com/en-us/dotnet/visual-basic/programming-guide/language-features/procedures/optional-parameters
' 1 as default value if nothing is given as parameter Sub ListaFemenino (s as long = 1) ... For i = s To rng.Paragraphs.Count ...
... with this you then need to detect from where to continue, how that is to be done is dependent on where you use it.