La méthode 'Range' de l'objet '_Global' a échoué.

Anonyme
2023-07-26T13:41:52+00:00

Bonjour à toutes et à tous,

Quand je veux valider ma création articles menus, j'ai le message d'erreur cité en titre dans la procédure cmdValidationCréationArticlesmenus_Click dès la première ligne de la partie Insertion des données saisies...

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

D'avance merci de m'aider à résoudre ce problème. Le fait que certaines procédures ne soient pas encore instructionnées peut-il être à l'origine de ce message ?

Microsoft 365 et Office | Excel | Pour les entreprises | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires
Réponse acceptée par l’auteur de la question
DanielCo 107.1K Points de réputation
2023-07-26T16:57:10+00:00

Ca plante parce que le combobox cbNomPériodeArticleMenu est vide. Mets :

      If cbNomPériodeArticleMenu <> "" Then  
        tbCodeNomPériodeArticleMenu.Value = WorksheetFunction.VLookup(cbNomPériodeArticleMenu, Range("TabPériodesArticlesMenus"), 2, False)  
      End If

Daniel

Cette réponse a-t-elle été utile ?

1 personne a trouvé cette réponse utile.
0 commentaires
Réponse acceptée par l’auteur de la question
DanielCo 107.1K Points de réputation
2023-07-26T13:54:19+00:00

Bonjour,

Essaie :"tabBDArticlesMenus" au lieu de "DArticlesMenus".

Daniel

Cette réponse a-t-elle été utile ?

1 personne a trouvé cette réponse utile.
0 commentaires

22 réponses supplémentaires

Trier par : Le plus utile
Le plus utile Les plus récents Les plus anciens
  1. DanielCo 107.1K Points de réputation
    2023-07-28T08:59:50+00:00

    Bonjour Christian,

    Je ne traite que d'une question à la fois. Après, le risque de tout mélanger est trop grand. Pour cette question précise :

    • L'instruction qui plante est la troisième avant la fin :

    tbNuméroCréationArticleMenu.Value = tbCodeNomNatureArticleMenu.Value & "-" & Format(Application.CountIf(Range("TabBDArticlesMenus[Code nature article menu]") + 1, "00"))

    Ce qui ne fonctionne pas : tu ajoutes "+1" à la plage Range("TabBDArticlesMenus[Code nature article menu]

    qui contient du texte. Je pense que le "+1" doit s'appliquer au résultat du CountIf (=NB.SI).

    Reformule la question suivante UNIQUEMENT si celle-ci est résolue.

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires
  2. Anonyme
    2023-07-28T07:41:35+00:00

    Bonjour Daniel,

    Tu préfères continuer sur la communauté ou par mail ? Sur le site, est-il possible d'envoyer des messages privés ? Si oui, comment procéder ?

    Pour Menus.xlsm : je n'arrive pas à comprendre pourquoi le tableau TabBDArticlesMenus est erroné en ce qui concerne le numéro création article menu : nulle part, il n'est indiqué de prendre le numéro article menu, ce qu'il fait (sauf erreur de ma part que je n'ai hélas pas découvert). J'espère que tu pourras ouvrir le fichier MENUS 2023 avec ses deux mots de passe que je me permets de rappeler : premier mot de passe : MENUS 2023 Deuxième mot de passe : MENUS 2023. Dans ce fichier MENUS 2023, le numéro création article menu (ou le AMNC, je ne me souviens pas) est correct et il a toujours tenu compte de renuméroter.

    Bonnes journée et continuation. Prends bien soin de toi.

    Cette réponse a-t-elle été utile ?

    0 commentaires
  3. DanielCo 107.1K Points de réputation
    2023-07-28T06:29:28+00:00

    Bonjour,

    Je n'ai pas eu le temps de regarder hier. Je le fais aujourd'hui.

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires