ModificationLibellés

Résolu
BUDGETS -  

Bonsoir à toutes et à tous,

Procédure SubModificationibellés : cette instruction ne s'exécute pas.

Suffixe = " " & LCase(cbNomNatureArticleMenu.Value) & " " & LCase(cbNomDessert.Value)
'Va modifier la caption de l'intitulé lbNomNatureNomNatureArticleMenu en prenant la caption de l'intitulé en y ajoutant le suffixe.
    lbNomDessert.Caption = "Nom dessert :" & Suffixe

Qu'il soit bien entendu que je ne demande pas de me refaire un programme mais seulement de résoudre le problème soulevé. D'avance merci pour votre aide précieuse.

Premier mot de passe : MENUS

Deuxième mot de passe : MENUS

https://www.cjoint.com/c/MGft7bBOiKx

BUDGETS

11 réponses

  1.  f894009

    Bonjour,

    Il faut apppeler Sub Modificationibellés sur changement cbNomDessert

    1
    1. BUDGETS Auteur

      Bonjour f894009,

      Merci d'avoir répondu. Cela fonctionne correctement. Je n'arrive pas à mettre le sujet comme étant résolu.

      0
  2. f894009

    Bonjour,

    Vous avez regarde la procedure Private Sub GénérationDictionnaires() dans l'UF?

    Je ne vais pas reecrire ce qui existe deja!

    1
    1. BUDGETS Auteur

      Bonsoir f894009,

      Mille excuses pour l'erreur. Ce n'est pas les cb mais les tbDessert, tbLégume et tbViandes qui me posent problème : quelle est l'instruction à écrire pour que le code apparaisse : passer si c'est possible et nécessaire par dictionary avec, éventuellement, un select case.

      Bonnes soirée et continuation. Prenez bien soin de vous.

      0
  3. BUDGETS Auteur

    As-tu des connaissances personnelles concernant Dictionary ?

    0
    1. f894009

      Bonjour,

      Sujet comme resolu, je ne sais pas,ai jamais ouvert de sujet

      Dictionary : que voulez vous faire avec?

      0
      2. BUDGETS Auteur

        Bonjour F894009,

        Dictionary : dans le fichier joint, si cela est possible, me servir de dictionary pour remplir les cbNomDessert, cbNomLégume et cbNomViande. Je ne demande pas tout mais seulement m'aider pour l'un des cb et je ferai pareil pour les autres. Si nécessaire, le cbNomNatureArticleMenu pourra être supprimé si il devient inutile.

        https://www.cjoint.com/c/MGhiEvjoNis

        0
        1. f894009

          Re,

          Je recupere le fichier et regarde la chose

          0
          1. f894009

            Re,

            C'est deja code dans Private Sub GénérationDictionnaires()!!

            Sauf cbNomNatureArticleMenu

            0
        2. f894009

          Bonjour,

          Ben, dans le fichier que vous avez mis a dispo, le traitement par dico de vos objects est deja fait

          0
          1. BUDGETS Auteur

            Bonjour f894009,

            OK. Alors comment remplir les cbNomDessert, cbNomLégume et cbNomViande en utilisant, si cela est possible et nécessaire, dictionary ?

            D'avance merci pour votre réponse.

            0
            1. f894009

              Bonjour,

              En effet, pas vraiment la meme chose.

              Je regarde la chose

              0
              1. f894009

                Bonjour,

                Vous avez tout ce qu'il vous faut dans ce fichier Budgets_TESTS-CCM-THEV.xlsm

                Frm_SaisiesPrédéfiniesCréationArticlesMenus

                exemple cette evenement

                Private Sub cbNomLégume_Change()
    Dim nom_période As String, code_période As String, nom_cond As String, code_cond As String

    If Me.cbNomLégume = Empty Then Exit Sub

    Me.tbCodeLégume = dic_produits_MMR_légumes(cbNomLégume.Value)
    Call infos_période_conditionnement(Me.tbCodeLégume & Me.cbNomLégume, nom_période, code_période, nom_cond, code_cond)
    Me.cbNomPériodeLégume = nom_période: Me.tbCodePériodeLégume = code_période: Me.cbNomConditionnementLégume = nom_cond: Me.tbCodeConditionnementLégume = code_cond

End Sub

                Donc decortiquez le code de l'UF pour comprendre et faire vos modif dans le fichier que vous avez mis a disopo

                Perso, je n'aurai pas utilise de dicos du fait qu'il n'y pas de problemes de doublons a traiter.

                0
                1. BUDGETS Auteur

                  Bonjour f894009,

                  Merci. Je vais essayer. Si c'était possible, j'aimerai bien que vous m'expliquiez certains instructions qui font référence à dictionary. Cela pourrait m'aider à créer les instructions nécessaires. Si vous êtes d'accord, je vous soumettrai les instructions. Pour ce qui est de call infos_période_conditionnement, quel est le but des instructions qui figurent dans cette procédure (elle semble ne pas fonctionner).

                  Bonnes journée et continuation. Bon weekend. Prenez bien soin de vous.

                  0
                2. BUDGETS Auteur

                  Bonjour f894009,

                  Première tentative n'a pas donné les résultats escomptés (pas de select case). Deuxième tentative (avec Select case) : résultats partiellement satisfaisants. Si cela était possible, je souhaiterais que le tbCodeDessert me mette non pas le Code nature article menu de la feuille listes, tableau structuré TabNatureArticleMenu, mais le Code produit de la feuille listes, tableau structuré TabProduits. Actuellement, je n'ai travaillé que sur les desserts.

                  https://www.cjoint.com/c/MGqjHyzUFSs

                  Bonnes journée et continuation. Prenez bien soin de vous

                  0
                3. BUDGETS Auteur

                  Bonjour f894009,

                  Dans ce fichier, deux problèmes : 

                  1) Prédéfinition quantité pour la journée, case dessert midi retraite : prévu "1,00";À l'exécution, il apparaît "2,00". Itou pour dessert soir. Pour Dessert weekend : pas de problème.

                  2) Modification libellés : pour nom période article menu et nom conditionnement article menu, prévu le nom nature article menu et le nom dessert. Le nom nature article menu ressort bien mais par le nom dessert. Itou pour tous les autres.

                  https://www.cjoint.com/c/MGqocjrcEWs

                  D'avance merci pour votre aide.

                  0
                4. BUDGETS Auteur
                  @BUDGETS

                  Message 17 : premier mot de passe : MENUS;Deuxième mot de passe : MENUS

                  0
                5. albert
                  @BUDGETS

                  Bonjour,

                  Difficile de vous suivre quand vous posez plusieurs problèmes différents sur un post que vous avez vous-même signalé comme résolu !

                  Par correction pour les contributeurs qui prendront la peine de vous répondre, merci de faire des messages séparés pour vos différents sujets et aussi merci de supprimer les mots de passe de vos fichiers transmis. Ce sera plus facile pour tous, vous ne croyez pas ?

                  Bonne journée

                  0
              2. BUDGETS Auteur

                Je confirme mon précédent message resté sans réponse : je n'ai pas compris votre réponse

                -1