Incrémenter "numéro de fiche d'après numéro de dossier"

Bonjours a tous,

Je me présent, je suis totalement novice sur Excel, je suis arrivé sur ce logiciel pour le travail et j’avoue en avoir pris gout. Maintenant j’essaie d’exploité toutes les heures de lecture sur différents forum. Afin de créer quelques outils me simplifiant la vie au boulot.

Je ne connais rien au VBA, mais en combinant quelques codes, je suis arrivé à mes fins.

Mais voilà, je viens vers vous parce que là je sèche.

Cela fait un bon moment que je recherche comment incrémenter une nouvelle ligne via un Userform. En fait 2 userfporm.

L’idée principale est d’avoir un premier userform qui m’aide à saisir des informations sur un dossier et de les ajouter à la dernière ligne non vide d’une feuille « Dossier » avec un nouveau numéro au format « année-N°d’ordre » à chaque fois que je clic sur « créer nouveau dossier ».

Jusqu’à la, cela fonctionne correctement.

Ensuite après avoir fait clic sur « créer nouveau dossier » apparait un message pour la confirmation de l’ajout puis ouvre un second userform qui sert à créer des fiches en rapport avec ce numéro de dossier créer précédemment.

Un dossier peut donc contenir plusieurs fiches ou non. Mais voilà je n’arrive pas à incrémenter les numéros de fiche d’après le numéro de dossier et qu’il recommence à 001 quand c’est un nouveau dossier.

Exemple :

Incrémenter la colonne B de 1 à chaque clic sur fiche suivante. Et remise a zéro si je clic sur quitter

« 2020-0001 » contient 1 fiche nommée 001

« 2020-0002 » contient 3 fiches nommées 001, 002, 003

« 2020-0003 » contient 2 fiches nommées 001, 002

Merci pour votre aide

Cordialement

Bonjour toutes et tous

@Nikos29

Est-ce normal lors de l'ouverture du classeur, que la feuil1 est inexistante dans votre classeur ?

voici le code

Private Sub Workbook_Open()
With Worksheets("Feuil1").Range("A1")
.Value = .Value + 1
End With
ThisWorkbook.Save
End Sub

crdlt,

André

Bonjour,

Oui, désolé. je ne l'utilise pas ce bout de code, reste d'un ancien test. je lance la macro GO pour affiché l'userform.

J'ai corrigé le fichier.

Merci

Bonsoir,

Je me permet de remonté, je suis vraiment a l'arrêt.

Cdlt.

re,

mes 4 tentatives en échec sorry (désolé) ouf! La 5ème un début

je ne pige pas avec ta combo qui fou le bordel

l'initalise de l'userform1 pour tes combos mettre dans une feuille de ton classeur et dans les propriétés du Rowsource de tes combos

edit: test ci-joint

crdlt,

André

Bonjour André,

A vrai dire, la combo de l'userforme 1 fonctionne bien. Elle s'incrémente de 1 a chaque ouverture de Userform et en cliquant pour déroulé la liste elle permet de rechargé les lignes précédemment enregistrer pour leurs édition.

Pour la combo de l'userform 2, je sèche. impossible d'incrémenté en fonction du numéro de dossier

Cdlt.

Bonjour,

Je suis parvenus a trouvé réponse a ma question.

J'ai simplifié les formulaire pour une version test. Je vous laisse le fichier, maintenant cela fonctionne nickel.

Merci pour votre intérêts