7 votes

Supprimer plusieurs modules « ThisWorkbook » de l'éditeur VBA Excel

Dans l'éditeur VBA, j'ai trouvé des instances en double du module 'ThisWorkbook' comme le montre cette capture d'écran :

entrer la description de l'image ici

J'aimerais supprimer ces instances supplémentaires, mais je ne sais pas comment faire.

ThisWorkbook1 est désormais le module reconnu par le système avec tous mes numéros de feuille maintenant avec un 1 ajouté à la fin d'eux, par exemple Sheet11, 21, 31, 41, 51, 61. Je n'ai aucune idée de comment les autres modules ont pu être créés. Est-ce que quelqu'un peut m'aider ?

4voto

seren Points 273

Un excel-vba Projet est hébergé dans un Classeur... voir deux objets Classeur sous un seul projet est très inquiétant (et en regardant les icônes que l'EDI utilise pour les "feuilles de calcul fantômes", il semble qu'il y ait même plus d'objets classeur que cela) - je vous suggérerais d'exporter tous les modules et de copier le code de feuille de calcul/classeur sain dans un nouveau fichier (je n'essaierais même pas d'ouvrir les copies fantômes), et de détruire celui-ci.

Votre projet est probablement corrompu d'une manière ou d'une autre.

0voto

Ricardo Diaz Points 101

Ceci est une ancienne question mais il s'est passé la même chose pour moi dans un grand projet.

Mais voici ce que j'ai fait pour résoudre le problème :

  1. Utiliser les outils Rubberduck pour exporter le code du projet dans un dossier
  2. Enregistrer le fichier au format xlsx (sans macros)
  3. Fermer et rouvrir le fichier
  4. Importer tout le code dans le projet (vous pouvez faire glisser et déposer les classes et les modules qui ne sont pas des feuilles de calcul ou classeurs, pour ces derniers vous pouvez copier-coller le code)
  5. Enregistrer le fichier au format xlsm (avec macro activées)
  6. Fermer et rouvrir le fichier

SistemesEz.com

SystemesEZ est une communauté de sysadmins où vous pouvez résoudre vos problèmes et vos doutes. Vous pouvez consulter les questions des autres sysadmins, poser vos propres questions ou résoudre celles des autres.

Powered by:

X