Hi

>> Dazu wird durch copieren der Tabelle mit dem Codename "Re_Landen"  ein neues Tabellenblatt codename "Re_Laden1" erstellt. Unter den Eigenschaften heißen all diese Blätter mit codename "Diese Arbeitsmappe"

Gast52941: Also entweder ist es ein Blatt das nur "Diese Arbeitsmappe" heißt, oder es ist eine Arbeitsmappe.

Effendy: Natürlich ist es kein "Blatt" das "Diese Arbeitsmappe´" heißt! (wer macht denn sowas? ;))

Gast52941:Eine Arbeitsmappe kann allein schon weil sie eine ist nur einmal je VBAProjekt vorkommen und da es alle mit gleichem Codenamen sind, scheint es sich um jeweils ein eigenes VBAProjekt zu handeln?

effendy: Genau an der Stelle hast Du das Problem erkannt. Besagte Datei, "Rechnungen.xlsx" hat im Projekt-Explorer:

Anzahl          Icon                                             im VBA-Projekt-Explorer angezeigter Name       Zugeordnetes Tabellenblatt                  Eigenschaften

1x                 günes X vor weißem Blatt           Diese Arbeitsmappe                                                           keines                                         34 von (name) bis write Password

65x                graue Tabelle vor weißem Blatt   diverse Codenamen je nach zuordnung                 jeweils eine                                  13 von (Name) bis visible

                                                                                  in Klammern den Tabellennamen

58 x            günes X vor weißem Blatt               diverse Codenamen je nach Herkunft                           keine                                           34 von (name) bis write Password

                                                                                    keine Klammern kein Name

die 58 Stück sind die Leichen. und NEIN es sind keine eigenen VBA-Projekte.

Gast52941:... redest und entfernen/löschen kann man die in Projekt-Explorer grundsätzlich nicht. Effendy: Danke für DEN Tipp!

Gast52941:Im Übrigen: Beim Löschen von Blättern sollte man vorrübergehend DisplayAlerts = False setzen. Wenn auf die sonst auftauchende Frage (Wirklich löschen?) nicht reagiert wird, passiert gar nix.

Effendy: sitzt auf False, es geht ja aber nicht um Blätter ...

Vielleicht ist jetzt das Problem klarer.  Vielleicht bin ich auch der einzige Excel-DAU dem sowas je passiert ist.

 Und: Natürlich geht es um VBA ist ja auch das VBAForum, oder stimmt die Überschrift nicht? Wer noch einen Rechdshcraibfeler findet, darf Ihn behalten!

End Sub Effendy