Excel : Calcul auto d'un n° séquentiel [Résolu/Fermé]

Signaler
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
-
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
-
Bonjour,

Je cherche à générer automatiquement un n° séquentiel qui s'incrémente de 1 à chaque fois. Cette incrémentation pouvant se faire sur le clic d'un bouton "Calcul n°" qui irait chercher le dernier n° attribué et l'incrémenter de 1. Qu'y-a-t-il comme solution dans Excel pour faire ça ?
Merci aux experts (clin d'oeil à michel s'il passe dans le coin)
Alain

7 réponses

Messages postés
9871
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 juin 2021
2 135
bonsoir

plusieurs solutions

https://www.cjoint.com/?0JevA4W6jdH

bonne suite
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
92
Bonsoir CCM81,
la double flèche permettant d'incrémenter et décrémenter le compteur me parait pas mal mais je n'ai pas trouvé le code. Ou est-il donc ?
Merci
Alain
Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 454
bonjour alainjjb, ccm81,

Tu peux aussi utiliser un événement :

Private Sub Worksheet_Change(ByVal sel As Range)
If sel.Column = 2 And Cells(sel.Row, 1) = "" Then
    Cells(sel.Row, 1) = Application.WorksheetFunction.Max(Columns(1)) + 1
End If
End Sub

Si tu saisis une nouvelle ligne en colonne B, la colonne A prend la valeur
qui irait chercher le dernier n° attribué et l'incrémenter de 1
Messages postés
9871
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 juin 2021
2 135
bonjour à tous

il n'y a pas de code, c'est la propriété LinkedCell qui est mise à A1 et qui comme son nom l'indique lie la cellule A1 au SpinButton (boite a outils controles/en mode creation/clic-droit/propriétés)

bonne suite
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
92
Bonsoir,
CCM81, merci. J'ai compris le fonctionnement du "ctrle formulaire" (1ère utilisation).
Gbinforme, en fait le n° séquentiel est lié au fichier (par exemple un n° de devis). Quel pourrait être dans ce cas l'événement déclencheur ?
Merci
Alain
Messages postés
14934
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 454
Bonsoir alainjjb,

Je suis parti de ta question qui disait : qui irait chercher le dernier n° attribué et l'incrémenter de 1

Si ton n° est propre à chaque classeur en étant incrémenté, il faudrait le mettre dans un classeur particulier auquel se référeraient les classeurs concernés ?
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
92
Re-bonsoir Gbinforme,
pour faire ce que tu proposes je dois créer une macro qui ouvre le classeur "num_Devis_Réf" contenant le n° de devis, activer la feuille "Num_Devis", récupérer ce dernier n° de devis attribué, l'incrémenter de 1, retourner dans le classeur "Devis" et y mettre ce n° calculé ... sans oublier de remettre à jour le classeur "Num_Devis_Réf".
Me vois-tu faire tout ça ??? Si oui merci pour cette confiance aveugle mais hélas désolé de te décevoir car j'en suis bien loin.
Merci de bien vouloir me donner un "énorme" coup de pouce.
Alain
Messages postés
751
Date d'inscription
jeudi 17 mai 2007
Statut
Membre
Dernière intervention
12 mai 2021
92
Bonjour à tous,
vous n'allez pas me croire. J'y suis arrivé et encore plus fort ÇA MARCHE.
Comme quoi la devise : La ou il y a une volonté il y a un chemin" se vérifie une fois de plus.
Merci à tous
Alain