Excel : Calcul auto d'un n° séquentiel

Résolu
alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   -  
alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   -
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

  2.
    alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   112
     
    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
    0
  3. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    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
    0
  4. ccm81 Messages postés 11033 Statut Membre 2 434
     
    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
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   112
     
    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
    0
    1. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
       
      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 ?
      0
  7. alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   112
     
    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
    0
  8. alainjjb Messages postés 747 Date d'inscription   Statut Membre Dernière intervention   112
     
    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
    0