Mettrea jour un listbox dans un userform

Bonjour a tous,

Je travaille sur un fichier excel contenant une base de donnée. Je sais qu'en général il est plus facile de partager un fichier excel de démo. Ici, je vous décrit ma situation car cela va peut etre etre complexe de vous partager un fichier excel car des mots de passes et le cryptage de la base de donnée sont deja en place.

Afin de faire des ajouts / updates dans cettte base de donnée, j'ai creer un userform. Mon userform fonctionne mais je voudrait l'optimiser.

Celui-ci se compose entre autre de deux listbox. Le listbox1 contient une list de nom de famille par exemple et le listbox2 une liste de prénom.

Pour reemplir les listbox, j'extrait deux colonnes de la base de donnée (nom et prénom pour rester sur mon exemple), je retirer les doublons et je tris par ordre alphabétique avant de reporter cela dans deux plages de cellule (sur une autre feuille que la base de donnée).

Les listbox s'appuiront sur ces deux plages pour se remplir.

Pour une nouvelle creation dans la base de donnée, je en touche paés aux listbox, je remplis des textbox et je clique sur un bouton add qui va lancer une macro qui reporte le contenu des textbox dans la base de donnée.

Pour une mise a jour, je selectionne un nom ce qui affine la liste des préniom correspondant et en selectionnant le prénom toutes les valeurs déja présente dans la base de donnée sont reportée dans les textbox du userform. J'ai ensuite un bouton update qui va aller mettre a jour les data modifiées dans la base de donnée.

Pour le moment, je ferme le userform et je le recharge afin de mettre a jour les listbox. J'aimerais faire en sorte que les listbox se mettent a jour après ajout ou update dans la base de donnée.

Pourriez vous m'aider s'il vous plait? N'hésitez pas a me demander si vous souhaitez que je vous partage du code du Userform.

Merci par avance pour votre aide

Bastien

Bonsoir Bastien, bonsoir le forum,

J'ai à peine commencé à lire ton Fil... Il est extrêmement facile avec Excel de reproduire un fichier avec le même environnement que ton fichier original, une poignée de données anonymes , l'USerform qui va bien et le reste...

Comprend que pour pouvoir te répondre il nous faut tester et, par conséquent, reproduire ce que toi tu n'as pas fait...

Hello

Toutes mes excuses. Je me suis dis que peut etre c'était un probleme facile et que quelqu'un aurait une idée a me suggerer.

Je vais essayer de faire une version soft de mon fichier.

Bonne journée a tous et encore une fois pardon d'avoir envoyer mon message sans fichier.

Re bonjour a tous,

Je viens de vous faire une version soft de mon fichier avec juste la base de donnée, le formulaire d'ajout/update (accessible avec le racourcit touche Ctrl+Alt+N) et la feuille de construction sur laquelle le userform s'appuit pour creer les deux listbox et la feuille de journalisation des modif de la BDD.

Merci par avance pour votre aide

Bastien

31bdd-dev.xlsm (83.31 Ko)

Bonjour Bastien,

Intéressant !... Mais je ne pourrai pas regarder ça avant ce soir... Peut-être que d'ici là tu auras une proposition.

Hello

Pas de probleme.

Je suis content que le sujet semble interessant :-)

S'il ya besoin de faire des transformation en profondeur dans le code c'est envisageable. J'ai choisit des listbox mais s'il a mieux a faire, ne pas hésiter a me le dire.

Bonne aprem et merci par avance pour l'aide

Bastien

Bonsoir Bastien, bonsoir le forum,

Bon je t'avoue que je suis perdu avec tous tes tableaux. Tu devrais n'avoir dans l'onglet constuction que des tableau uniques représentant tes listes. Là, il y en a quatre rien que pour les Références !?...

Tu n'as pas besoin de passer par ces tableaux pour alimenter des ListBoxes en cascades. Regarde l'UserForm1 (où j'ai remplacé les ListBoxes par des ComboBoxes). Je ne peux pas aller au-delà car je ne vois pas ce tu veux faire...

63bastien-ep-v01.xlsm (91.33 Ko)

Hello

Merci pour ta réponse et ton aide

Je vais étudier ça avec attention.

Bonne journée a tous

Bastien

C'est nikel, merci :-)

Rechercher des sujets similaires à "mettrea jour listbox userform"