CbCodArt ne se remplit pas.

Résolu
BUDGETS Messages postés 1608 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 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

7 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 715
 
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 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 17277 Date d'inscription   Statut Membre Dernière intervention   1 715 > BUDGETS Messages postés 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 1608 Date d'inscription   Statut Membre Dernière intervention   > f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention  
 
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 17277 Date d'inscription   Statut Membre Dernière intervention   1 715 > BUDGETS Messages postés 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 1608 Date d'inscription   Statut Membre Dernière intervention   > f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention  
 
Merci.
C'est une personne de ce site comme vous et un xlnaute (Excel downloads).
0
Le Pingou Messages postés 12250 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
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 12250 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
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 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 12250 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
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   Statut Membre Dernière intervention   145
 
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 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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 17277 Date d'inscription   Statut Membre Dernière intervention   1 715
 
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 1608 Date d'inscription   Statut Membre Dernière intervention  
 
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