Supportnet / Forum / Tabellenkalkulation
Makroproblem
Frage
Hallo und guten Morgen Leute...
habe folgendes Problem:
Ich habe eine Excelarbeitsmappe wo mehrere Makros und Tabellenblätter drin enthalten sind. Eines der Makros bewirkt das kopieren von einem Tabellenblatt was ich als Vorlage zur Dateneingabe benutze.
Mein Problem ist nun das ich gerade festgestellt habe, das ich dieses Tabellenblatt nur 34 mal kopieren kann und ich kann mir bei besten Willen nicht erklären woran das liegt! Es taucht plötzlich die folgende Fehlermeldung auf:
Laufzeitfehler '1004':
Die Copy-Methode des Worksheet-Objektes konnte nicht ausgeführt werden.
Hier mal der Code des programmierten Makros:
Private Sub btnKopiereBlanko_Click()
Workbooks("BCMR32.xls").Sheets("Blanko").Copy _
After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
End Sub
Könnt Ihr mir den Fehler erklären???
Viele Grüße
Antwort 1 von Hajo_Zi
Hallo Unbekannter,
vielleicht löst sich das Problem, wenn Du eine Mustervorlage einfügst. Der interne Name von Excel it begrenzt und er wird anders weitergeführt beim Kopieren eines vorhandener Tabelle und einfügen einer Mustervorlage, soweit ich das in Erinnerung habe.
Gruß Hajo
vielleicht löst sich das Problem, wenn Du eine Mustervorlage einfügst. Der interne Name von Excel it begrenzt und er wird anders weitergeführt beim Kopieren eines vorhandener Tabelle und einfügen einer Mustervorlage, soweit ich das in Erinnerung habe.
Gruß Hajo
Antwort 2 von Makroproblem
Hallo Hajo,
Schldigung --> Tim ;-)
wie meinst du das denn mit ner Mustervorlage?? Das zu kopierende Tabellenblatt ist eigendlich die Mustervorlage, welche mit Daten gefüllt wird... jedes Tabellenblatt in der Arbeitsmappe sieht genau so aus!
Wie ist das mit dem interen Namen bei Excel?? Versteh ich nicht so ganz?? Der kann doch nicht schon bei 45 Tabellenblätter (zur zeitige Anzahl in meiner Mappe) erreicht sein oder??
Gruß Tim
Schldigung --> Tim ;-)
wie meinst du das denn mit ner Mustervorlage?? Das zu kopierende Tabellenblatt ist eigendlich die Mustervorlage, welche mit Daten gefüllt wird... jedes Tabellenblatt in der Arbeitsmappe sieht genau so aus!
Wie ist das mit dem interen Namen bei Excel?? Versteh ich nicht so ganz?? Der kann doch nicht schon bei 45 Tabellenblätter (zur zeitige Anzahl in meiner Mappe) erreicht sein oder??
Gruß Tim
Antwort 3 von nok106
Hallo Tim,
habe das folgende Makro probiert, läuft bei mir ohne Probleme:
Gruß Odje
habe das folgende Makro probiert, läuft bei mir ohne Probleme:
Option Explicit
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Workbooks("Mappe1.xls").Sheets("Vorlage").Copy _
After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
ThisWorkbook.Sheets("Vorlage").Activate
Application.ScreenUpdating = True
End Sub
Gruß Odje