Kann mir jemand sagen (Schreiben) wie ich in einer Datei leere Mappen löschen kann. Die Anzahl ist unterschiedlich.
Gruß
Peter
Kann mir jemand sagen (Schreiben) wie ich in einer Datei leere Mappen löschen kann. Die Anzahl ist unterschiedlich.
Gruß
Peter
das ist zum Löschen von Tabelle2 und Tabelle 3 , jetzt muss Du nur noch wissen, wie man an die Namen aller Blätte rankommt, dass müsste aber eine Eigenschaft des Apllication-Obects sein. Vielleicht weisst Du aber auch für Deine Anwendung die Namen?
Sheets("Tabelle2").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Tabelle3").Select
ActiveWindow.SelectedSheets.Delete
Markus
Danke für Deine Antwort.
Was Du angeführt hast ist genau der Kernpunkt. Ich suche einen Code der irgendwie abcheckt ob das einzelene Tabellenblatt leer ist oder nicht und wenn ja dann dieses Blatt löscht. Oder vieleicht gibt es eine eifache Zeile die lautet "alle leeren Blätter löschen"
Die Anzahl und die Namen der Blätter sind eben immer unterschiedlich.
Gruß
Peter