Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abbruch nach 43 eingefügten Sheets

Forumthread: Abbruch nach 43 eingefügten Sheets

Abbruch nach 43 eingefügten Sheets
08.02.2008 10:41:06
Mario
Hallo,
in eine Mappe füge ich über folgenden Code
Sheets("Kal").Copy After:=Workbooks(Dat).Sheets(1)
weitere Sheets ein.
Das Makro bricht jedoch ab sobald das 43. Sheet eingefügt wird.
Fehlermeldung:
Laufzeitfehler 1004
Die Copy-Methode des Worksheet-Objektes konnte nicht ausgeführt werden.
Wie kann das sein? Von Hand kann ich weitere Sheets einfügen.
Viele Grüße / Mario

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abbruch nach 43 eingefügten Sheets
08.02.2008 10:54:00
Wolli
Hallo Mario, nur ein Verdacht: Schau Dir mal die Namen der Tabellenblätter im Projekt-Explorer (im VBA-Editor) an. Dort stehen neben den Anzeigenamen auch die "echten" Namen. Wenn die "Tabelle111", "Tabelle1111", ... , "Tabelle1111111111111" lauten, könnte das das Problem verursachen.
Ich lasse die Frage nochmal offen.
Gruß, Wolli

Anzeige
AW: Abbruch nach 43 eingefügten Sheets
08.02.2008 11:04:09
jhuthmann
Hallo Mario,
du bist da auf einen bekannten bug in EXCEL gestossen, für den es meiner Recherche nach keine direkte Lösung gibt.
Eventueller workaround:
Nur die Inhalte des zu kopierenden Blattes kopieren und in ein neu zu erstellendes leeres sheet einfügen.
Sinngemäß:
sheets.add after:=woauchimmer
sheets("kal").cells copy
Workbooks(Dat).Sheets(2).pastespecial (inhalte und dannach spaltenbreiten)
andere Lösung:
Datei perodisch schliessen und neu öffnen:
siehe auch:
http://support.microsoft.com/default.aspx?scid=kb;en-us;210684&Product=xlw
(inclusive quelltext)
Gruß
Jens

Anzeige
AW: Abbruch nach 43 eingefügten Sheets
08.02.2008 11:28:00
Mario
Tatsächlich.
Zwischenspeichern und schon klappt es.
Danke!
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige