GENERER UN CODE

Y compris Power BI, Power Query et toute autre question en lien avec Excel
s
sebalbw1987
Nouveau venu
Nouveau venu
Messages : 1
Inscrit le : 15 juin 2016
Version d'Excel : 2003 FR

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.
Avatar du membre
bernard22
Membre dévoué
Membre dévoué
Messages : 882
Appréciations reçues : 11
Inscrit le : 26 mars 2015
Version d'Excel : 2013FR

Message par bernard22 » 17 juin 2016, 21:30

Bonsoir,
Sauf erreur de ma part, pas de fichier joint.
@+
Avatar du membre
fred2406
Membre impliqué
Membre impliqué
Messages : 1'963
Appréciations reçues : 33
Inscrit le : 13 mai 2014
Version d'Excel : 2007-201364bits-2011MAC

Message par fred2406 » 18 juin 2016, 10:17

bonjour
:bv:
voici une proposition sans macro... voir le fichier joint
cellule en A3 a tirer vers le bas
Fred
Classeur1.xlsx
(9.32 Kio) Téléchargé 21 fois
Modifié en dernier par fred2406 le 18 juin 2016, 10:54, modifié 1 fois.
Je ne réponds pas aux M.P. non sollicités.
Fred
Avatar du membre
fred2406
Membre impliqué
Membre impliqué
Messages : 1'963
Appréciations reçues : 33
Inscrit le : 13 mai 2014
Version d'Excel : 2007-201364bits-2011MAC

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
Classeur1.xlsm
(14.66 Kio) Téléchargé 15 fois
Je ne réponds pas aux M.P. non sollicités.
Fred
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message