CbCodArt ne se remplit pas.

Résolu/Fermé
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024 - Modifié le 22 août 2021 à 12:15
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 - 25 août 2021 à 09:02
Bonjour à toutes et à tous,

Aucune des instructions tapées ne remplit le cbCodArt. D'avance merci à celle ou à celui qui va pouvoir me dépanner. Évidemment, une instruction pour remplir le tbNomArt me sera très utile. Les codes proposés seront-ils valables pour tous les NAM ou seulement pour le DMR ? À toutes fins utiles, et si cela est possible, j'opterai pour une instruction avec WorksheetFunction.VLookup.
https://www.cjoint.com/c/KHwkeANuAUo

7 réponses

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
23 août 2021 à 10:20
Bonjour a vous deux,

BUDGETS:
A quoi bon vous faire ce que vous demandez, si vous n'utilisez pas le fichier modife!
https://forums.commentcamarche.net/forum/affich-37313055-remplissage-du-cbcodart-a-partir-du-cbcodectg-ou-du-lbnomdes#p37314328
3
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
23 août 2021 à 10:34
Bonjour f894009,

Le lien ne s'ouvre pas d'une part et d'autre part, c'est un nouveau fichier avec l'utilisation de WorksheetFunction.VLookup
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
Modifié le 23 août 2021 à 10:52
Re,

Le lien ne s'ouvre pas d'une part
Z'etes sur?

c'est un nouveau fichier avec l'utilisation de WorksheetFunction.VLookup
Peut-etre, mais il est sur que vous avez repris la meme structure de code qui ne marche pas du fichier precedent.
L'instruction WorksheetFunction.VLookup est pour tbNomNAM.Value donc rien a voir avez la combobox [cbCodeArt].
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024 > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
23 août 2021 à 11:00
Si j'ai fait une erreur, merci de me dire où elle se trouve et de la corriger ou de me mettre sur la voie pour que j'essaie de la corriger moi-même. Deboggage, pas à pas détaillé, pour les instructions suivantes, cela me sort Feuille_LT01 = nothing. Cela veut dire quoi et est-ce une erreur ou pas ? Si erreur, c'est quoi comme erreur ?
'Initialisation des variables modules pour indiquer la référence de Feuille
Set Feuille_LT01 = FL03_LT01
Set Feuille_LT02 = FL04_LT02
Set Feuille_LT03 = FL05_LT03
Set Feuille_LT04 = FL06_LT04
Set Feuille_Bd_articles_menus = FL02_BDAM
Set Feuille_Jours_fériés = FL07_JF
Oui, je suis sûr que le lien ne s'ouvre pas. J'ai ouvert ce fichier à partir d'Excel et je confirme qu'il est différent de Menus ccm.
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
23 août 2021 à 17:07
Re,
Fichier du 15/08:
https://www.cjoint.com/c/KHxpcSNYk4f (j'ai utilise Cijoint car mon-partage est en rade)

Plus ici, la modif pour TbNomConditionnement
https://forums.commentcamarche.net/forum/affich-37318517-tbnomconditionnement-ne-se-remplit#p37318654

Maintenant question: qui a reelement ecrit le code de votre fichier?
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024 > f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024
Modifié le 23 août 2021 à 17:54
Merci.
C'est une personne de ce site comme vous et un xlnaute (Excel downloads).
0
Le Pingou Messages postés 12182 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 7 novembre 2024 1 448
Modifié le 22 août 2021 à 22:30
Bonjour,
Juste au passage, il serait bien que vous fassiez un pas à pas sur le code (macro) qui est en charge de renseigner votre combobox [cbCodeArt] afin de découvrir se qui ne vas pas… et dit apporter la correction... !

Note, un minimum serait d'indiquer sur quelle exécution de programme se produite le problème


1
Le Pingou Messages postés 12182 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 7 novembre 2024 1 448
23 août 2021 à 10:11
Bonjour,
Eh bien la c'est dommage pour vous surtout si vous construisez un code et que vous n'arrivez pas à le contrôler son exécution.
Alors, sur quelle exécution de programme se produite le problème
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
23 août 2021 à 10:39
Bonjour Le Pingou,

J'ai essayé ta méthode. Pour les instructions suivantes, en passant la souris, cela me sort Feuille_LT01 = nothing. Cela signifié quoi et est-ce une erreur ? Si erreur, laquelle ?
'Initialisation des variables modules pour indiquer la référence de Feuille
Set Feuille_LT01 = FL03_LT01
Set Feuille_LT02 = FL04_LT02
Set Feuille_LT03 = FL05_LT03
Set Feuille_LT04 = FL06_LT04
Set Feuille_Bd_articles_menus = FL02_BDAM
Set Feuille_Jours_fériés = FL07_JF
0
Le Pingou Messages postés 12182 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 7 novembre 2024 1 448
23 août 2021 à 11:03
Bonjour,
Je viens de voir le message de f894009 (salutations) et dans ce sens je me retire du poste
0

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

Posez votre question
ALS35 Messages postés 1033 Date d'inscription jeudi 18 juillet 2019 Statut Membre Dernière intervention 9 janvier 2024 139
23 août 2021 à 15:49
Bonjour BUDGETS, bonjour à tous,

@Le Pingou, @f894009
Difficile de suivre notre ami BUDGETS n'est-ce pas ?

@BUDGETS
Ma parole, j’hallucine, tu recommences un autre fichier sans même terminer le précédent. Les différentes propositions ne te convenaient pas ?

Tu trouves que :
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Feuille_LT04.ListObjects("LNAM").Range, 2, False)

qui pourrait s’écrire plus simplement :
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Range("LNAM"), 2, False) 

est plus compréhensible que :
tbNomNAM.Value = Range("LNAM[NNAM]").Item(N)
?

Il y a des tas d’autres façons de faire, avec la méthode .find, avec les méthodes Index et Match, avec une boucle de recherche, … Tu veux toutes les tester ?

Pour le cbCodArt, je te mets sur la voie, l’appel de la procédure Initialise_Articles est mal placé !

Cordialement
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
23 août 2021 à 16:43
Bonjour f894009,

J'ai un fichier dans lequel WorksheetFunction.Vlookup est abondamment utilisé, c'est pour cela que j'ai voulu le tester dans mon propre fichier. Quant à l'appel de la procédure Initialise_Articles, dans ledit fichier il est placé dans UserForm_Initialize, donc j'ai fait de même; dans ce fichier, il y a d'autres appels à des procédures qui le précèdent : est-ce la raison du non fonctionnement ?
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
Modifié le 23 août 2021 à 19:47
cbCpdArt : appel de la procédure mal placé. J'ai suivi le raisonnement suivant : à l'ouverture du formulaire, on choisit le NAM; le NAM choisi, que voit-on : c'est le code des articles. Je me suis dit, dans la procédure cbcodeNam_Change, à la fin, si on demandait gentiment, poliment de se rendre sur Initialise_Articles, peut-être que la procédure serait contente, heureuse. Aussitôt pensé, aussitôt écrit. Premier essai : Nam01 : résultat : code article : DMR01; Nom article : Pomme. Maintenant je vais continuer à coder les select case. J'ai gardé WorksheetFunction.Vlookup en instruction et pas en commentaires, mes quatre feuilles. J'ai modifié les privates en dim, les feuilles en feuille_liste (excepté pour la bd et les jours fériés).
0
f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
Modifié le 25 août 2021 à 09:09
Bonjour,

Aucune des instructions tapées ne remplit le cbCodArt
Ben, tout se passe normalement!!



Je parle du fichier Menu.

Suite:

Je viens de voir que vous avez cree une autre demande le 24/08/2021.
Je recupere le fichier BUDGETS-ALS35-V11 (8).xlsm
0
BUDGETS Messages postés 1479 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 5 novembre 2024
22 août 2021 à 22:53
Bonsoir LE PINGOU,

Je ne suis pas assez expert pour comprendre le pas à pas. Je n'ai jamais rien compris à ces différentes manoeuvres
-1