Numéroter en vba

Bonjour bonjour,


J'ai un problème assez compliqué sur Excel, j'espère pouvoir m'expliquer correctement :


Sur la même feuille, j'ai plusieurs tableaux les uns sous les autres, séparés par des saut de page. J'aimerais les numéroter de la sorte : 1/3, 2/3, 3/3.

Je prends un exemple : J'ai 13 tableaux, l'un sous l'autre. Manque de pot, il sont divisés :

Première série de 4 tableaux, à numéroter de 1/4 à 4/4
Deuxième série de 8 tableaux, à numéroter de 1/8 à 8/8
Troisième série de 1 tableau, à numéroter 1/1

J'ai déjà réussi à avoir dans une cellule le nombre de tableaux par série. Cette cellule se situe toujours au même endroit par rapport à la cellule de numérotation : R[-3]C[4]

Ce qui pourrait me donner :

dim x as integer
x = 0
x = x + 1
activecell.formulaR1C1 = x & "/" & R[-3]C[4]

Ce qui déjà ne fonctionne pas. Qui plus est, si ça fonctionnait, ça numéroterait de 1/13 à 13/13. Ce serait déjà pas mal, mais il faudrait en plus que je sépare les séries...

Peut-être avec un do until, du genre :

Do until x = R[-3]C[4]
et ensuite recommencer...

Si vous avez compris quelque chose à ce charabia et si vous avez une idée, je suis preneur !


Merci par avance.