GENERER UN CODE

Message par **sebalbw1987** » 15 juin 2016, 14:34

Bonjour,

Je recherche une solution pour générer un code à chaque saisie sur un fichier.

Vous trouverez en PJ le fichier en question.

Concrètement je souhaite qu'à chaque saisie, un code se génère
ex : ALBW-061600001 Puis 2 puis 3 etc.
ALBW étant le nom de ma société et 0616 le mois et année (juin 2016)

J'ai essayé avec une macro mais je n'y arrive pas :/ d'ailleurs je n'arrive pas non plus à la supprimer !

Merci de votre aide, j'espère avoir été assez clair.

Message par **bernard22** » 17 juin 2016, 21:30

Bonsoir,
Sauf erreur de ma part, pas de fichier joint.
@+

1'963 · Message par **fred2406** » 18 juin 2016, 10:17

bonjour

voici une proposition sans macro... voir le fichier joint
cellule en A3 a tirer vers le bas
Fred

1'963 · Message par **fred2406** » 18 juin 2016, 10:53

re
et par macro :

Sub numserie()
Cells(Cells(Rows.Count, "A").End(xlUp).Row + 1, "A") = "ALBW-" & Right("00" & Month(Date), 2) & Right(Year(Date), 2) & Right("00000" & Right(Cells(Cells(Rows.Count, "A").End(xlUp).Row, "A"), 5) + 1, 5)
End Sub

fred