XL 2010 Création de listes déroulantes interactive

  • Initiateur de la discussion Initiateur de la discussion jeanmi
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jeanmi

XLDnaute Occasionnel
J’ai un onglet « liste articles »

Dans lequel, j’ai 3 colonnes, A, B et C avec des références, des désignations, en C des familles. Les plages A2 :C36 sont nommées « table articles », peut-être pas utile ?

J’ai dans l’onglet « Bon de Cde »

En colonne A, de A27 : A57 des références qui s’afficheront en fonction du choix sélectionné au niveau de désignation (colonne C) et qui ne s’affiche que s’il y a une quantité dans la colonne D, ça fonctionne.

J’ai en colonne B des familles de produit, à partir d’une liste déroulante.

Ce que je voudrais faire, si possible :

Actuellement la liste déroulante qui est affichée au niveau de désignation, en colonne C, prend en compte toutes les données qui sont définies dans l’onglet « liste articles »

Es qu’il est possible que la liste déroulante qui est au niveau de désignation, colonne C, n’affiche que les désignations qui correspondent à la famille sélectionnée au niveau de famille, colonne B ?

J’ai fait beaucoup d’essais, sans arrivé à trouver une solution.

On me dit peut-être tableau croisé dynamique, mais là je ne maitrise pas ni dans le cas d’une solution VBA.

Il faut que je puisse, simplement, par la suite ajouter des informations complémentaires à l’onglet liste articles. Peut-être que la construction de mon fichier n'est pas la bonne ?

Si joins mon fichier d’essai.

Merci pour votre aide.

Cordialement
 

Pièces jointes

Solution
Bonjour à tous.
Salut job75, jeanmi va devoir s'accrocher, il a à faire à un dur à cuir. Tus sais dans les îles ont a la peau dure : tannée par le soleil.
Et rappelle toi mes débuts ! Entre mon premier post et la fin, il y en eu un paquet aussi. Vous ne m'avez pas lâché !
Je m'amuse trop !
jeanmi, merci pour ton commentaire.
Je te mets la nouvelle version. J'ai modifié certaines choses :
1°) Un message et le process si le bon de commande a déjà été renseigné,
2°) Le classement des factures par ordre : dernier enregistrement au 1er. Cela n'a pas été simple, mais c'est fait.
Fais moi un retour.
Cordialement.
Bonjour à tous.
jeanmi, j'ai apporté quelques modifications au fichier:
1° j'ai rajouté dans tous les comboBox de recherche la ligne suivante :
VB:
If Trim(Me.Cbx_RechercheFamille.Value) = "" Then Exit Sub
Cela permet de ne pas lancer une recherche si le comboBox est vide et cela le nettoie des espaces vides..
2°) Je t'ai donné aussi la possibilité de passer d'une comboBox recherche à l'autre. Cela donne plus de fluidité dans les manipulations. C'est patricktoulon qui m'a donné l'idée dans un échange sur un autre fil.
3°) J'ai classé par ordre croissant le contenu du "Cbx_RechercheFournisseur" dans le formulaire "Ajout_Facture".
Test et dis-moi.
Bonne journée.
Bonjour @Piment à tous,

J’ai presque terminé de basculer, les codes vers mon fichier, je sais il ne faut pas, mais ça fonctionne presque.

Je vais regarder les modifications apportées à ta nouvelle version et les appliquer sur mon fichier (merci Word, comparer deux fichier pour trouver les écarts)

Actuellement, je rentre tous les bons de Cde passés depuis le début de l'année.
J’ai aussi modifié des petites choses dans le code, comme je travaille avec deux écrans et que je n’étais pas obligatoirement positionné sur le bon onglet, j'ai eu des petites erreurs. J’ai aussi modifier la position des UserForm au démarrage
Me.StartUpPosition = 1 passe Me.StartUpPosition = 0
et pour renseigner l'onglet Détail Commande
.Offset(, 1).Value = [B3] par .Offset(, 1).Value = ThisWorkbook.Sheets("Commande").Range("B3").Value

Encore un peu de travail pour moi, à ma vitesse de compréhension …

Merci encore

Cordialement
 
Bonjour @Piment à tous,

J’ai presque terminé de basculer, les codes vers mon fichier, je sais il ne faut pas, mais ça fonctionne presque.

Je vais regarder les modifications apportées à ta nouvelle version et les appliquer sur mon fichier (merci Word, comparer deux fichier pour trouver les écarts)

Actuellement, je rentre tous les bons de Cde passés depuis le début de l'année.
J’ai aussi modifié des petites choses dans le code, comme je travaille avec deux écrans et que je n’étais pas obligatoirement positionné sur le bon onglet, j'ai eu des petites erreurs. J’ai aussi modifier la position des UserForm au démarrage
Me.StartUpPosition = 1 passe Me.StartUpPosition = 0
et pour renseigner l'onglet Détail Commande
.Offset(, 1).Value = [B3] par .Offset(, 1).Value = ThisWorkbook.Sheets("Commande").Range("B3").Value

Encore un peu de travail pour moi, à ma vitesse de compréhension …

Merci encore

Cordialement
Bonsoir à tous.
jeanmi,je trouve que tu te débrouilles plutôt bien.
Bon courage.
Cordialement.
 
Bonsoir à tous.
jeanmi,je trouve que tu te débrouilles plutôt bien.
Bon courage.
Cordialement.
Bonjour @Piment à tous,

J’avais espéré finaliser le projet sans avoir à te solliciter à nouveau, mais je bloque sur quelques points.

Pour l’instant, je n’ai pas encore intégré les modifications que tu as apportées dans ta version V13.

Dans mon fichier, l’userform Ajout Facture refuse de s’ouvrir, et malgré mes recherches, je n’arrive pas à identifier la cause du problème. Je reconnais avoir fait quelques ajustements de mon côté (tu verras par toi-même), mais toujours en essayant de respecter la structure que tu avais mise en place.

Si tu as une solution, je suis convaincu que tu pourras m’aider. J’ai joint mon fichier pour que ce soit plus simple, car je tourne un peu en rond en essayant de tout régler seul.

Merci par avance encore une fois.

Cordialement
 

Pièces jointes

Bonjour @Piment à tous,

J’avais espéré finaliser le projet sans avoir à te solliciter à nouveau, mais je bloque sur quelques points.

Pour l’instant, je n’ai pas encore intégré les modifications que tu as apportées dans ta version V13.

Dans mon fichier, l’userform Ajout Facture refuse de s’ouvrir, et malgré mes recherches, je n’arrive pas à identifier la cause du problème. Je reconnais avoir fait quelques ajustements de mon côté (tu verras par toi-même), mais toujours en essayant de respecter la structure que tu avais mise en place.

Si tu as une solution, je suis convaincu que tu pourras m’aider. J’ai joint mon fichier pour que ce soit plus simple, car je tourne un peu en rond en essayant de tout régler seul.

Merci par avance encore une fois.

Cordialement
Bonjour à tous.
jeanmi, déjà tu as modifié la Sub "Ouvrir_Facture". Laisse comme c'était : cette sub ouvre le formulaire : point. Je ne comprends pas ce que tu cherches à faire avec ton code !
C'est bien que tu tentes des modifications, mais attention à ne pas mettre le bazar dans le "z'affaire".
Mais ce n'est pas le seul problème que tu as. Je te laisse les découvrir.
Mon avis : ne te complique pas les choses inutilement.
Fais comme je t'ai dit.
 
Bonjour à tous.
jeanmi, déjà tu as modifié la Sub "Ouvrir_Facture". Laisse comme c'était : cette sub ouvre le formulaire : point. Je ne comprends pas ce que tu cherches à faire avec ton code !
C'est bien que tu tentes des modifications, mais attention à ne pas mettre le bazar dans le "z'affaire".
Mais ce n'est pas le seul problème que tu as. Je te laisse les découvrir.
Mon avis : ne te complique pas les choses inutilement.
Fais comme je t'ai dit.
Bonjour @Piment à tous,

Voilà les ajustements que j’ai apportés pour adapter le programme à notre utilisation quotidienne :

Le logiciel sera installé sur 3 postes, potentiellement à des adresses différentes (notamment pour mes enfants), et utilisé par 4 à 5 personnes de la famille. Comme tout le monde ne maîtrise pas forcément l’outil, j’ai anticipé les risques d’erreurs en testant différentes situations et en adaptant les interfaces après en avoir discuté avec chacun. (Même des erreurs volontaires pour voir le comportement)

Voici les principales modifications (sans toucher à la structure de ton code, que je ne maîtrise pas assez pour modifier) :
  • L’emplacement et l’organisation de l’UserForm (et de ses champs) : des ajustements visuels, mais rien qui ne devrait impacter le fonctionnement, il me semble.
  • La gestion des noms de fichiers : j’ai adapté le processus (Avec beucoup de difficulté) pour éviter de renommer manuellement chaque facture à son arrivée. Désormais, il suffit de les placer dans le dossier Archive_Factures. Pour info, le nom des fichiers est toujours du type : Facture BFA0347.pdf, donc un nom (Facture) des lettres et des chiffres.
  • Des vérifications supplémentaires pour récupérer les données au bon endroit, surtout quand l’utilisateur change d’onglet ou bascule l’UserForm sur un deuxième écran (on travaille souvent en multi-écrans). Pour le changement d’onglet c’est utilisé pour vérifier les commandes déjà passées par exemple, surtout lors de l’utilisation de l'UserForm Commande, pour vérifier une information sur un autre onglet.
  • D’autres petits détails pour fluidifier l’utilisation, ajout message ou suppression, mais toujours dans le respect de ton travail initial
Pour information, ça fonctionné très bien au niveau de l'UserForm Facture, après j’ai fait d’autre adaptation dans le même but au niveau de l’userForm Commande et c’est lorsque le Commande fonctionné bien que j’ai testé à nouveau l’ensemble que j’ai eu le problème sur l’UserForme Factures.

J’espère que ces adaptations te semblent logiques ! L’objectif était de rendre l’outil plus accessible sans altérer son fonctionnement de base.

Cordialement
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour