Que faire maintenant ?
Résolu/Fermé
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
-
17 août 2021 à 17:45
BUDGETS Messages postés 1554 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 19 décembre 2024 - 19 août 2021 à 10:15
BUDGETS Messages postés 1554 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 19 décembre 2024 - 19 août 2021 à 10:15
4 réponses
MPMP10
Messages postés
42188
Date d'inscription
vendredi 28 avril 2017
Statut
Membre
Dernière intervention
19 décembre 2024
16 237
17 août 2021 à 18:41
17 août 2021 à 18:41
Bonjour,
Ce serait bien de continuer ici :
https://forums.commentcamarche.net/forum/affich-37313055-remplissage-du-cbcodart-a-partir-du-cbcodectg-ou-du-lbnomdes
Ce serait bien de continuer ici :
https://forums.commentcamarche.net/forum/affich-37313055-remplissage-du-cbcodart-a-partir-du-cbcodectg-ou-du-lbnomdes
Le Pingou
Messages postés
12225
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
6 décembre 2024
1 452
17 août 2021 à 19:26
17 août 2021 à 19:26
Bonjour,
Eh bien voyons donc, c'est vraiment inutile... !
Dans votre dernier poste il n'y a pas de demande.
Eh bien voyons donc, c'est vraiment inutile... !
Dans votre dernier poste il n'y a pas de demande.
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
17 août 2021 à 19:34
17 août 2021 à 19:34
Évidemment, puisque ma demande figure dans mon premier message.
Le Pingou
Messages postés
12225
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
6 décembre 2024
1 452
17 août 2021 à 21:07
17 août 2021 à 21:07
ALS35
Messages postés
1033
Date d'inscription
jeudi 18 juillet 2019
Statut
Membre
Dernière intervention
9 janvier 2024
139
17 août 2021 à 21:11
17 août 2021 à 21:11
Bonjour à tous, bonjour BUDGETS,
Dans Private Sub cbCodeCtg_Change()
remplace :
cbCodArt.List = Range("LDMR[CDMR]").Value
par
cbCodArt.Clear
cbCodArt.Value = Range("LDMR[CDMR]").Item(1)
idem pour DS
et dans LT01 supprime les lignes vides pour DMR et DS.
Cela dit tu as aussi des tas d'instructions et de déclarations inutiles, voici ma vision des choses avec un fichier restructuré et fortement épuré.
https://www.cjoint.com/c/KHrthOhuf1b
Cordialement
Dans Private Sub cbCodeCtg_Change()
remplace :
cbCodArt.List = Range("LDMR[CDMR]").Value
par
cbCodArt.Clear
cbCodArt.Value = Range("LDMR[CDMR]").Item(1)
idem pour DS
et dans LT01 supprime les lignes vides pour DMR et DS.
Cela dit tu as aussi des tas d'instructions et de déclarations inutiles, voici ma vision des choses avec un fichier restructuré et fortement épuré.
https://www.cjoint.com/c/KHrthOhuf1b
Cordialement
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
Modifié le 17 août 2021 à 21:52
Modifié le 17 août 2021 à 21:52
Bonsoir ALS35,
Dans private sub cbCodeCtg_change, tu me conseilles de faire des remplacements. Dans le fichier que tu as joint, sauf erreur ou omission de ma part, tu ne reprends pas ces remplacements. Est-ce normal ? Ou ce sont deux choses différentes. Inutile de répondre, j'ai vu (enfin !!!).En tout cas, dans ton fichier joint, cela fonctionne : le lbnomart2 fonctionne. As-tu vu les messages de MPMP10 et de LE PINGOU avec les réponses que je leur ai faites.
Que ce soit pour toi ou d'autres répondeurs, je ne suis plus informé de l'arrivée d'un nouveau message, ce qui m'ennuie beaucoup. Si tu as une solution pour remédier à ce problème, à moins que cela ne vienne de CCM.
Chez moi, Dans Excel, dans le dossier ALS35, j'ai créé un nouveau sous-dossier intitulé FICHIER À NE PAS SUPPRIMER dans lequel l'ai enregistré le fichier que tu as joint.
Dans private sub cbCodeCtg_change, tu me conseilles de faire des remplacements. Dans le fichier que tu as joint, sauf erreur ou omission de ma part, tu ne reprends pas ces remplacements. Est-ce normal ? Ou ce sont deux choses différentes. Inutile de répondre, j'ai vu (enfin !!!).En tout cas, dans ton fichier joint, cela fonctionne : le lbnomart2 fonctionne. As-tu vu les messages de MPMP10 et de LE PINGOU avec les réponses que je leur ai faites.
Que ce soit pour toi ou d'autres répondeurs, je ne suis plus informé de l'arrivée d'un nouveau message, ce qui m'ennuie beaucoup. Si tu as une solution pour remédier à ce problème, à moins que cela ne vienne de CCM.
Chez moi, Dans Excel, dans le dossier ALS35, j'ai créé un nouveau sous-dossier intitulé FICHIER À NE PAS SUPPRIMER dans lequel l'ai enregistré le fichier que tu as joint.
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
18 août 2021 à 23:05
18 août 2021 à 23:05
Bonsoir ALS35,
J'ai refait mon fichier en apportant quelques modifications par rapport au tien : j'ai gardé mes quatre feuilles liste (LT01, LT02, LT03 et LT04), j'ai modifié le nom de certains outils. Tout ceci fait, j'ai modifié le codes des trois procédures de l'UserForm UF01_CtgArt (qui se nomme maintenant UF01_CAM) et tout fonctionne à merveille. Maintenant, je dois écrire le code du bouton de commande cmdGO, OK. Sauf avis contraire de ta part, je vais me baser sur BUDGETS-ALS35-V11 (8).xlsm pour l'écrire (en changeant éventuellement certains noms si nécessaire).
Autre question : Pour OK, est-il nécessaire de le renvoyer sur un nouveau UserForm dont une partie reprendra des éléments de l'UserForm UF01_CAM ou je finis de compléter l'UserForm UF01_CAM avec les outils qui manquent ? Dans ce cas, le bouton OK (qui pourra changer de nom) renverra vers une procédure de validation.
Bonnes fin de soirée et continuation.
Cordialement.
J'ai refait mon fichier en apportant quelques modifications par rapport au tien : j'ai gardé mes quatre feuilles liste (LT01, LT02, LT03 et LT04), j'ai modifié le nom de certains outils. Tout ceci fait, j'ai modifié le codes des trois procédures de l'UserForm UF01_CtgArt (qui se nomme maintenant UF01_CAM) et tout fonctionne à merveille. Maintenant, je dois écrire le code du bouton de commande cmdGO, OK. Sauf avis contraire de ta part, je vais me baser sur BUDGETS-ALS35-V11 (8).xlsm pour l'écrire (en changeant éventuellement certains noms si nécessaire).
Autre question : Pour OK, est-il nécessaire de le renvoyer sur un nouveau UserForm dont une partie reprendra des éléments de l'UserForm UF01_CAM ou je finis de compléter l'UserForm UF01_CAM avec les outils qui manquent ? Dans ce cas, le bouton OK (qui pourra changer de nom) renverra vers une procédure de validation.
Bonnes fin de soirée et continuation.
Cordialement.
ALS35
Messages postés
1033
Date d'inscription
jeudi 18 juillet 2019
Statut
Membre
Dernière intervention
9 janvier 2024
139
>
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
19 août 2021 à 09:40
19 août 2021 à 09:40
Bonjour BUDGETS,
Si tout fonctionne à merveille, passe ce sujet, qui concernait lbNomAarticles2, en résolu.
Pour la suite, le plus simple pour toi est de compléter le formulaire existant.
Cordialement
Si tout fonctionne à merveille, passe ce sujet, qui concernait lbNomAarticles2, en résolu.
Pour la suite, le plus simple pour toi est de compléter le formulaire existant.
Cordialement
BUDGETS
Messages postés
1554
Date d'inscription
samedi 19 juillet 2014
Statut
Membre
Dernière intervention
19 décembre 2024
>
ALS35
Messages postés
1033
Date d'inscription
jeudi 18 juillet 2019
Statut
Membre
Dernière intervention
9 janvier 2024
19 août 2021 à 10:15
19 août 2021 à 10:15
Bonjour ALS35,
C'est bien ce que je pensais.
C'est bien ce que je pensais.
17 août 2021 à 18:46
17 août 2021 à 18:49
Par qui ?