Bonjour,
J'ai fait des recherches sur le forum mais je n'ai pas trouvé de solutions satisfaisantes (ou alors je n'ai pas réussi à les implémenter :/. Donc un petit coup de cerveau
est le bienvenu !
Je voudrai afficher dans un Userform une numérotation automatique, que ce soit dans un Textbox, ou dans un Label (vu sur le forum).
sous le format 'NuméroMoisAnnée' où
'Numéro' va de 1 à l'infini
'Mois' de type mm
'Année' de type yy pour 2010,
Soit Nmmyy, au final pour la 1ere pièce du mois de janvier de l'année 2010 on a "11010"
Sous excel cela prendrait cette forme =CONCATENER(Numéro;MOIS(A3);ANNEE(A3))
En l'espèce dans le fichier il faut :
1. mettre une variable qui prend les valeurs, 1,2,3,4 etc....(suivant ce qui est déjà utilisé...et il faut que la variable recommence à partir de '1' si le mois change)
2. Récupérer le mois tapé dans la textbox nommée "DateBox"
3. Récupérer l'année mais juste les 2 derniers chiffres à partir de DateBox
4. Concaténer le tout
Si on peut afficher le numéro dès que l'utilisateur a tapé la date c'est encore mieux ! (mais facultatif
)
Exemples de numéros :
11010
21010
31010
11110
21110
31110
11210
21210
ETC....
Je joins le fichier de travail, vous verrez pour ce qui s'y connaissent à mon avis le code c'est n'importe quoi puisque j'assemble des codes vba trouvés ci et là
. Mais bon là j'ai pas l'ingrédient pour faire la soupe de code alors ...
..merci d'avance ! (et ça marche ..pour l'instant !)
erf..le fichier dépasse le maximum....ha non c'est bon ....