comment créer des séries pour chaque groupe de 1 à fin de groupe

J'ai des données dans Excel comme ci-dessous

month 1 4 12 12 12 12 6 8 7 12 12 12 12 12 12 7 10 12 12 12 

Comment donner des séries pour seulement 12 ans comme ci-dessous

 month Series 1 4 12 1 12 2 12 3 12 4 6 8 7 12 1 12 2 12 3 12 4 12 5 12 6 7 10 12 1 12 2 12 3 

Merci d'avance

Essayez le code suivant dans le module de code feuille de calcul où vous mettez vos données. Je suppose que la colonne A est Mois et la colonne B est Série .

 Sub Checking_Value() Dim i As Long, LastRow As Long, n As Long LastRow = Cells(Rows.Count, "A").End(xlUp).Row n = 0 For i = 1 To LastRow If Cells(i, 1).Value = 12 Then n = n + 1 Cells(i, 2) = n Else n = 0 End If Next i End Sub