CbCodArt ne se remplit pas.
Résolu
BUDGETS
Messages postés
1612
Date d'inscription
Statut
Membre
Dernière intervention
-
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention -
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
BUDGETS
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
BUDGETS
7 réponses
-
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-
-
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]. -
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. -
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? -
-
-
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
-
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-
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
-
-
Bonjour,
Je viens de voir le message de f894009 (salutations) et dans ce sens je me retire du poste
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
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-
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 ? -
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).
-
-
-
Bonsoir LE PINGOU,
Je ne suis pas assez expert pour comprendre le pas à pas. Je n'ai jamais rien compris à ces différentes manoeuvres