Fichiers BUDGETS-ALS35-V11 (8) .xlsm et MENUS.xlsm
Résolu
BUDGETS
Messages postés
1607
Date d'inscription
Statut
Membre
Dernière intervention
-
BUDGETS Messages postés 1607 Date d'inscription Statut Membre Dernière intervention -
BUDGETS Messages postés 1607 Date d'inscription Statut Membre Dernière intervention -
Bonsoir à toutes et à tous,
Fichier BUDGETS-ALS35-V11 (8).xlsm : feuille Accueil articles : clic sur le bouton de commande Création article budgétaire (formulaire 1) : l'UserForm_SaisieArticle_1 apparaît à l'écran : dans la zone de liste modifiable Catégorie, clic sur n'importe quelle ligne de la liste : le nom apparaît dans le texbox consacré : Dépenses alimentaires : dans la zone de liste modifiable Article, clic sur DA01: son nom apparaît dans le textbox consacré : sans faire de clic sur Valider création, dans la zone de liste modifiable catégorie, clic sur n'importe quelle ligne de la liste : la zone de liste modifiable Article se vide. Tout est parfait.
Fichier MENUS.xlsm : feuille Accueil : clic sur le bouton de commande Création articles menus : l'UserForm UF01_CAM apparaît à l'écran : dans la zone de liste modifiable Code nature article menu, clic sur NAM01 : le nom apparaît dans le textbox consacré : Dessert midi retraite : dans la zone de liste modifiable Code article et le textbox consacré : les noms apparaissent automatiquement (déjà une différence avec BUDGETS) : sans cliquer sur aucun des boutons de commande du bas (ils sont d'ailleurs momentanément inactifs), dans la zone de liste modifiable Code nature article menu, clic sur NAM02, la zone de liste Code article ne se vide pas. Remarque : dans la procédure Initialise_Article, après le end select, j'ai dû mettre les deux instructions en commentaires sinon la liste déroulante de la zone de liste modifiable code article reste vide.
Sans être expert (sinon, je ne serai pas un questionneur), je pense que ce dysfonctionnement entre les deux fichiers pourrait venir, dans le mien, du fait que LLDMR et LLDS n'ont qu'une seule ligne chacune.
D'avance merci à celle (s) ou à celui (ceux) qui pourront résoudre les deux problèmes de mon fichier MENUS.xlsm.
Fichier BUDGETS-ALS35-V11 (8).xlsm :
https://www.cjoint.com/c/KHyuuLS5Rho
Fichier MENUS.xlsm :
https://www.cjoint.com/c/KHyutizioso
BUDGETS
Fichier BUDGETS-ALS35-V11 (8).xlsm : feuille Accueil articles : clic sur le bouton de commande Création article budgétaire (formulaire 1) : l'UserForm_SaisieArticle_1 apparaît à l'écran : dans la zone de liste modifiable Catégorie, clic sur n'importe quelle ligne de la liste : le nom apparaît dans le texbox consacré : Dépenses alimentaires : dans la zone de liste modifiable Article, clic sur DA01: son nom apparaît dans le textbox consacré : sans faire de clic sur Valider création, dans la zone de liste modifiable catégorie, clic sur n'importe quelle ligne de la liste : la zone de liste modifiable Article se vide. Tout est parfait.
Fichier MENUS.xlsm : feuille Accueil : clic sur le bouton de commande Création articles menus : l'UserForm UF01_CAM apparaît à l'écran : dans la zone de liste modifiable Code nature article menu, clic sur NAM01 : le nom apparaît dans le textbox consacré : Dessert midi retraite : dans la zone de liste modifiable Code article et le textbox consacré : les noms apparaissent automatiquement (déjà une différence avec BUDGETS) : sans cliquer sur aucun des boutons de commande du bas (ils sont d'ailleurs momentanément inactifs), dans la zone de liste modifiable Code nature article menu, clic sur NAM02, la zone de liste Code article ne se vide pas. Remarque : dans la procédure Initialise_Article, après le end select, j'ai dû mettre les deux instructions en commentaires sinon la liste déroulante de la zone de liste modifiable code article reste vide.
Sans être expert (sinon, je ne serai pas un questionneur), je pense que ce dysfonctionnement entre les deux fichiers pourrait venir, dans le mien, du fait que LLDMR et LLDS n'ont qu'une seule ligne chacune.
D'avance merci à celle (s) ou à celui (ceux) qui pourront résoudre les deux problèmes de mon fichier MENUS.xlsm.
Fichier BUDGETS-ALS35-V11 (8).xlsm :
https://www.cjoint.com/c/KHyuuLS5Rho
Fichier MENUS.xlsm :
https://www.cjoint.com/c/KHyutizioso
BUDGETS
A voir également:
- Fichiers BUDGETS-ALS35-V11 (8) .xlsm et MENUS.xlsm
- Clé windows 8 - Guide
- Mixcraft 8 - Télécharger - Création musicale
- Renommer des fichiers en masse - Guide
- Fichiers epub - Guide
- Internet explorer 8 - Télécharger - Navigateurs
8 réponses
Bonjour,
Ok,
Ok,
Il y a quelquefois des problèmes qui nous dépassent.
Pour ce qui est de recherchearticlesmenus, pour la bd articles menus, on faisait la recherche à partir du code article. Pour le fichier actuel, pour la bd menus, faire une telle recherche risque de poser des problèmes (il y a cinq codes : légume, viande; dessert, code légume deux, code période menu viande midi weekend). Dans le cas où cela poserait des problèmes de codification, j'ai pensé faire cette recherche sur numéro création. À vous de voir quelle est la meilleure solution.
Pour ce qui est de recherchearticlesmenus, pour la bd articles menus, on faisait la recherche à partir du code article. Pour le fichier actuel, pour la bd menus, faire une telle recherche risque de poser des problèmes (il y a cinq codes : légume, viande; dessert, code légume deux, code période menu viande midi weekend). Dans le cas où cela poserait des problèmes de codification, j'ai pensé faire cette recherche sur numéro création. À vous de voir quelle est la meilleure solution.
Colonne AM intitulée NC.
Une fois de plus, je ne suis pas averti de l'arrivée de vos messages.
Pour ce qui est de commencer l'enregistrement en A1 au lieu d'A2, sans autres explications, ALS35 a signalé que c'était normal car LgArt n'était pas initialisé et que de ce fait Ici = 0. Il m'a dit de voir cela avec vous. Je n'ai rien trouvé en ce qui concerne l'initialisation de LgArt.
Une fois de plus, je ne suis pas averti de l'arrivée de vos messages.
Pour ce qui est de commencer l'enregistrement en A1 au lieu d'A2, sans autres explications, ALS35 a signalé que c'était normal car LgArt n'était pas initialisé et que de ce fait Ici = 0. Il m'a dit de voir cela avec vous. Je n'ai rien trouvé en ce qui concerne l'initialisation de LgArt.
Bonjour BUDGETS,
Je t'avais dit que tu allais être embêté avec les desserts !
Dans la procédure Initialise_Article, remplace :
cbCodArt.Value = Range("LDMR[CDMR]").Item(1)
par
cbCodArt.AddItem Range("LDMR[CDMR]").Item(1)
idem pour DS
Ne mets surtout pas les deux dernières instructions de la procédure en commentaire et déplacent les avant le Select Case c'est probablement plus logique. Au passage tu aurais du voir qu'avant de les mettre en commentaires cela fonctionnait très bien pour tout, sauf pour les desserts
Par ailleurs, et je te l'ai déjà dit, dans la procédure cbCodeNAM_Change remplace :
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Feuille_Liste_LT04.ListObjects("LNAM").Range, 2, False)
par
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Range("LNAM"), 2, False)
et ainsi tu pourras supprimer toutes les déclarations concernant les Private et Set Feuille_Liste_LT01 comme je l'avais fait dans le fichier épuré que je t'ai transmis il y a peu.
Cordialement
Je t'avais dit que tu allais être embêté avec les desserts !
Dans la procédure Initialise_Article, remplace :
cbCodArt.Value = Range("LDMR[CDMR]").Item(1)
par
cbCodArt.AddItem Range("LDMR[CDMR]").Item(1)
idem pour DS
Ne mets surtout pas les deux dernières instructions de la procédure en commentaire et déplacent les avant le Select Case c'est probablement plus logique. Au passage tu aurais du voir qu'avant de les mettre en commentaires cela fonctionnait très bien pour tout, sauf pour les desserts
Par ailleurs, et je te l'ai déjà dit, dans la procédure cbCodeNAM_Change remplace :
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Feuille_Liste_LT04.ListObjects("LNAM").Range, 2, False)
par
tbNomNAM.Value = WorksheetFunction.VLookup(cbCodeNAM.Value, Range("LNAM"), 2, False)
et ainsi tu pourras supprimer toutes les déclarations concernant les Private et Set Feuille_Liste_LT01 comme je l'avais fait dans le fichier épuré que je t'ai transmis il y a peu.
Cordialement
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Re,
Je t'avais dit
Il se dit tellement de choses..
Pour le moment, j'ai trouve pour quoi dans le fichier que je vous ai remis le 15/08 ca marche et pas dans le votre avec .list. C'est dans la defintion des donnees a recuperer. J'utilise vos tableaux d'une maniere que le nombre de lignes ne peut poser de probleme
Maintenant, dans votre fichier, il n'est pas normal de coder differemment en fonction du nombre de donnees a recuperer. Une doit avoir le meme code que x.
J'ai ajoute une ligne au tableau LDMR, le additem ne prend pas en compte la deuxieme ligne, normal
A vous devoir
Pour faire un raz de cbCodArt, il suffit de mettre
avant le Select
Je t'avais dit
Il se dit tellement de choses..
Pour le moment, j'ai trouve pour quoi dans le fichier que je vous ai remis le 15/08 ca marche et pas dans le votre avec .list. C'est dans la defintion des donnees a recuperer. J'utilise vos tableaux d'une maniere que le nombre de lignes ne peut poser de probleme
Maintenant, dans votre fichier, il n'est pas normal de coder differemment en fonction du nombre de donnees a recuperer. Une doit avoir le meme code que x.
J'ai ajoute une ligne au tableau LDMR, le additem ne prend pas en compte la deuxieme ligne, normal
A vous devoir
Pour faire un raz de cbCodArt, il suffit de mettre
Private Sub Initialise_Articles() 'Initialisation articles cbCodArt.Clear Select Case cbCodeNAM.Value
avant le Select
Bonjour F894009,
Au seuil de cette nouvelle année, je vous présente mes meilleurs vœux d'heureuse année et surtout de très bonne sante pour vous et votre famille et tous ceux qui vous sont chers.
Dans ce fichier, pourriez-vous regarder l'UserForm UF02_CM, la procédure DTPickerDDM_Change :
1) Pourriez-vous m'expliquer en détail l'instruction suivante, surtout le chiffre 5 (c'est moi qui l'ai mis).
If cbCNM.Value = "MMR" And WorksheetFunction.Weekday(DateValue(DTPickerDDM), 2) = 5 Then
2) Apportez les corrections nécessaires pour que les instructions s'exécutent pour le MMR pour la viande et le dessert : du mardi au vendredi inclus, les combo box cbCMV, cbCMD, cbCJMV, cbCJMV, cbCJMD et cbCCOMD doivent être identiques à ceux du lundi.
D'avance merci pour votre aide.
https://www.cjoint.com/c/LAAlbUxtWbQ
Au seuil de cette nouvelle année, je vous présente mes meilleurs vœux d'heureuse année et surtout de très bonne sante pour vous et votre famille et tous ceux qui vous sont chers.
Dans ce fichier, pourriez-vous regarder l'UserForm UF02_CM, la procédure DTPickerDDM_Change :
1) Pourriez-vous m'expliquer en détail l'instruction suivante, surtout le chiffre 5 (c'est moi qui l'ai mis).
If cbCNM.Value = "MMR" And WorksheetFunction.Weekday(DateValue(DTPickerDDM), 2) = 5 Then
2) Apportez les corrections nécessaires pour que les instructions s'exécutent pour le MMR pour la viande et le dessert : du mardi au vendredi inclus, les combo box cbCMV, cbCMD, cbCJMV, cbCJMV, cbCJMD et cbCCOMD doivent être identiques à ceux du lundi.
D'avance merci pour votre aide.
https://www.cjoint.com/c/LAAlbUxtWbQ
Re,
une instruction pour chaque jour de la semaine
Mais non
'de lundi a vendredi
une instruction pour chaque jour de la semaine
Mais non
'de lundi a vendredi
If cbCNM.Value = "MMR" And WorksheetFunction.Weekday(DateValue(DTPickerDDM), 2) <= 5
Suite:
Pour le choix date, faut savoir si vous voulez utilisez un DTPicker ou l'UF Calandar mais pas les deux
Pour le choix date, faut savoir si vous voulez utilisez un DTPicker ou l'UF Calandar mais pas les deux
D'après mes essais, je préfère le DTPicker en textbox. Voir fichier joint : dans BD menus, je peux formater en date longue.
https://www.cjoint.com/c/LABqWlizCxQ
https://www.cjoint.com/c/LABqWlizCxQ
Bonjour F894009,
En attendant la résolution du DTPickerDDM_Change, voici un nouveau cas.
Un jour, le code légume est le LMR08 (Maïs). Le lendemain (ou le jour valide qui suit sera un lundi si la première fois, c'est un vendredi), le code devra être également LMR08. Mon instruction actuelle (transformée en commentaires) ne donne pas satisfaction. Il en sera de même si le code légume est LMR14 (Radis). Auriez-vous une solution à me proposer ? D'avance merci pour votre aide.
https://www.cjoint.com/c/LACj3fk6PQQ
En attendant la résolution du DTPickerDDM_Change, voici un nouveau cas.
Un jour, le code légume est le LMR08 (Maïs). Le lendemain (ou le jour valide qui suit sera un lundi si la première fois, c'est un vendredi), le code devra être également LMR08. Mon instruction actuelle (transformée en commentaires) ne donne pas satisfaction. Il en sera de même si le code légume est LMR14 (Radis). Auriez-vous une solution à me proposer ? D'avance merci pour votre aide.
https://www.cjoint.com/c/LACj3fk6PQQ
https://www.cjoint.com/c/KKxs6PA2ewb