numeroter des champs

excusez moi petite erreur dans mon 1 er poste (debutant en VBA mais aussi dans les forum )


Bonjour,
Débutant en VBA , je vient demander votre aide pour une macro , pour numéroter des champs
J’avait trouver le fichier de PierreJean mais ce n’est pas exactement ce que je recherche
Je m’explique j’ai une macro de recherche qui me renvoi des blocs de doublon en colonne
AJ’aimerais que chaque blocs donc chaque recherche qui ce place les unes a la suite des autres soit
numéroter 1 = 1ere recherche donc le 1er bloc 2= 2eme recherche donc le 2eme bloc ainsi de suite
numérotation dans les colonnes J ET K
EXEMPLE
A J K
200 1 1
200 1 1
200 1 1
400 2 2
400 2 2
562 3 3
562 3 3

2EME question :
Cette numérotation peut-elle être incrémenter de + 1 dans la colonne k après 6 recherche consécutives
EXEMPLE

A J K
200 1 1
200 1 1
200 1 1
400 2 2
400 2 2
562 3 3
562 3 3
568 4 4
273 5 5
273 5 5
273 5 5
11 6 6
11 6 6
Apres 6eme recherche
A j k
113 1 2
113 1 2
113 1 2
159 2 2
159 2 2
333 3 2
333 3 2
Cela jusqu'à 6 fois puis on incrémente encore de +1 la colonne k toutes les 6 recherches

D’avance merci pour votre aide