Microsoft 365 incrémenter numéro en fonction du mois

[JVOS]

Bonjour
J'ai les données suivantes :
Colonne A : date (jj/mm/aaaa)
Colonne B : numéro (composé de l'année (2 caractères) + mois (2 caractères) + numéro s'incrémentant sur 4 caractères : aamm000x
Plage d'intervention L10:Bn n=dernière ligne ou Bn est vide

Je souhaite créer une macro qui fait une boucle de la ligne n à la ligne 10 (en remontant) :
dans la colonne B, se positionner à la dernière cellule vide
créer le numéro (composé de l'année (2 caractères) + mois (2 caractères) + numéro s'incrémentant sur 4 caractères :
pour Bn vérifier si mois(An)=mois(An+1)
si vrais alors incrémentation +1
si faux alors aamm0001 (1er numéro du mois)
Copier la ligne entière et la coller feuille "EC SG" (à partir de la ligne 2)
La boucle se termine avec la ligne 10
Merci pour votre temps

date	numéro		numéro attendu
			en B
20/05/2024​			24050006​
20/05/2024​			24050005​
15/05/2024​			24050004​
10/05/2024​			24050003​
02/05/2024​			24050002​
02/05/2024​			24050001​
30/04/2024​	24040006​
28/04/2024​	24040005​
15/04/2024​	24040004​
12/04/2024​	24040003​
05/04/2024​	24040002​
01/04/2024​	24040001​

 

[ALS35]

Bonjour,
Un essai ?

=--(TEXTE(A10;"aa")&TEXTE(A10;"mm")&TEXTE(LET(m;MOIS((A10:A$21));NB(FILTRE(m;m=MOIS(A10))));"0000"))

Cordialement

 

[JVOS]

Bonjour,
Un essai ?

=--(TEXTE(A10;"aa")&TEXTE(A10;"mm")&TEXTE(LET(m;MOIS((A10:A$21));NB(FILTRE(m;m=MOIS(A10))));"0000"))

Cordialement

Bonjour
Merci pour ta réponse,
Du coup je me suis rendu compte que je n'ai pas précisé que ça doit être fait en VBA car c'est le début d'une macro.
La maro doit prendre en compte la plage ligne 10 à la dernière ligne non renseigné en colonne B

 

[djidji59430]

Bonjour à tous,

une autre
=TEXTE(A10;("aamm"))&TEXTE(SOMMEPROD((MOIS($A10:$A$21)=MOIS($A10))*1);"0000")

Ça se ressemble, hein ?

Crdlmt

 

[ALS35]

Bonjour à tous,

une autre
=TEXTE(A10;("aamm"))&TEXTE(SOMMEPROD((MOIS($A10:$A$21)=MOIS($A10))*1);"0000")

Ça se ressemble, hein ?

Crdlmt

Effectivement, mais TEXTE(A10;("aamm")), c'est mieux !
Mais comme il faut du VBA ...

 

[JVOS]

Effectivement, mais TEXTE(A10;("aamm")), c'est mieux !
Mais comme il faut du VBA ...

merci d'avoir consacré du temps

 

[Phil69970]

Bonjour à tous

@JVOS

Ce que tu veux faire ressemble à des n° de factures

Si c'est bien cela alors je te propose cette piste à adapter bien sur :
Voir ici ==> https://excel-downloads.com/threads...e-selon-lannee-en-vba.20077091/#post-20592360

Merci de ton retour

 

[JVOS]

Bonjour à tous

@JVOS

Ce que tu veux faire ressemble à des n° de factures

Si c'est bien cela alors je te propose cette piste à adapter bien sur :
Voir ici ==> https://excel-downloads.com/threads...e-selon-lannee-en-vba.20077091/#post-20592360

Merci de ton retour

Bonjour Phil69970
J'ai regardé, effectivement c'est exactement le même principe mais j'ai pas réussi à l'adapter à mon besoin.
j'ai reformulé mon besoin car la création de numéro se fait de bas vers le haut et ensuite je dois récupérer chaque ligne sur une autre feuille de haut vers le bas.
Merci pour ton temps

 

[Phil69970]

@JVOS

1) Avec ton vrai fichier anonymisé bien sur je pourrais essayer de l'adapter.

2) Quelle est l'ordre de grandeur du nombre de factures par mois que tu comptes faire ?

3) Et perso n'ayant pas une vision d'ensemble de ton fichier j'ai du mal à comprendre pourquoi tu le veux le faire dans ce sens (du bas vers le haut) d’où ma demande d'avoir ton vrai fichier....

4) Ton fichier y compris avec les macros que tu as faite