Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Ausgeblendetes Blatt kopieren

Forumthread: Ausgeblendetes Blatt kopieren

Ausgeblendetes Blatt kopieren
27.09.2006 15:50:59
Holger
Hallo,
in einer Mappe mit insgesamt 13 Blättern sind 5 Blätter ausgeblendet. Wie kann ich über einen Befehl z. B. das ausgeblendete Blatt "Test1" kopieren und an das Ende, also hinter Blatt 13, stellen?
Irgendwie kriege ich das nicht hin.
Gruss, Holger
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Ausgeblendetes Blatt kopieren
27.09.2006 15:53:02
Rudi
Hallo,
das musst du vorher schon einblenden.
Gruß
Rudi
AW: Ausgeblendetes Blatt kopieren
27.09.2006 15:57:12
UweD
Hallo
so...

Sub Blattcopy()
'wird hinter das letzet Blatt kopiert
'und ist damit das neue Letzte
Sheets("Test1").Copy After:=Sheets(Sheets.Count)
'macht das Neue Letzte sichtbar
Sheets(Sheets.Count).Visible = True
End Sub

Gruß UweD
(Rückmeldung wäre schön)
Anzeige
AW: Ausgeblendetes Blatt kopieren
27.09.2006 16:36:03
Holger
Alles klar. Ich wollte eigentlich den eleganten Befehl zum Kopieren eines ausgeblendeten Blattes wissen, bin jetzt aber durch die Hinweise weitergekommen.
Vielen Dank
;
Anzeige

Infobox / Tutorial

Ausgeblendete Blätter in Excel kopieren


Schritt-für-Schritt-Anleitung

Um ein ausgeblendetes Blatt in Excel zu kopieren, befolge diese Schritte:

  1. Öffne deine Excel-Datei, die das ausgeblendete Blatt enthält.
  2. Blende das ausgeblendete Blatt ein:
    • Klicke mit der rechten Maustaste auf einen der sichtbaren Blätter.
    • Wähle „Einblenden“ aus dem Kontextmenü.
    • Wähle das Blatt „Test1“ aus und klicke auf „OK“.
  3. Kopiere das Blatt:
    • Gehe zu dem eingefügten Blatt „Test1“.
    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
    • Füge den folgenden Code ein:
Sub Blattcopy()
    ' wird hinter das letzte Blatt kopiert
    ' und ist damit das neue Letzte
    Sheets("Test1").Copy After:=Sheets(Sheets.Count)
    ' macht das Neue Letzte sichtbar
    Sheets(Sheets.Count).Visible = True
End Sub
  1. Führe das Makro aus:
    • Drücke F5 im VBA-Editor oder gehe zurück zu Excel und führe das Makro aus.
  2. Überprüfe das Ergebnis: Das ausgeblendete Blatt sollte jetzt hinter dem letzten Blatt in deiner Mappe vorhanden sein.

Häufige Fehler und Lösungen

  • Fehler: Das Blatt „Test1“ ist nicht vorhanden
    Lösung: Stelle sicher, dass der Name des Blattes korrekt eingegeben wurde, und überprüfe, ob es wirklich ausgeblendet ist.

  • Fehler: Das Makro wird nicht ausgeführt
    Lösung: Überprüfe, ob Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu „Datei“ > „Optionen“ > „Sicherheitscenter“ und aktiviere die Makros.


Alternative Methoden

Eine einfache Methode, um ein ausgeblendetes Blatt zu kopieren, ist die Verwendung der Benutzeroberfläche:

  1. Einblenden über das Menü: Klicke mit der rechten Maustaste auf ein sichtbares Blatt, wähle „Einblenden“ und anschließend das ausgeblendete Blatt.
  2. Kopieren: Rechtsklicke auf das jetzt sichtbare Blatt und wähle „Verschieben oder Kopieren…“.
  3. Kopieren aktivieren: Aktiviere das Kästchen „Eine Kopie erstellen“ und wähle die Position aus, an der du das Blatt einfügen möchtest.

Praktische Beispiele

Nehmen wir an, du hast eine Arbeitsmappe mit den Blättern „Januar“, „Februar“, „März“ und ein ausgeblendetes Blatt „Test1“. Um „Test1“ hinter dem Blatt „März“ zu kopieren, kannst du die oben beschriebenen Schritte befolgen, um sicherzustellen, dass es am gewünschten Ort eingefügt wird.


Tipps für Profis

  • VBA-Skript anpassen: Du kannst das VBA-Skript so anpassen, dass es mehrere ausgeblendete Blätter auf einmal kopiert, indem du eine Schleife verwendest.
  • Benutzerdefinierte Makros: Speichere häufig verwendete Makros in deiner persönlichen Makroarbeitsmappe, um schnellen Zugriff zu haben.
  • Blätter benennen: Vergiss nicht, die Blätter nach dem Kopieren sinnvoll zu benennen, um die Übersichtlichkeit zu wahren.

FAQ: Häufige Fragen

1. Wie kann ich ein ausgeblendetes Blatt wieder sichtbar machen?
Rechtsklicke auf ein sichtbares Blatt, wähle „Einblenden“ und wähle das Blatt, das du sichtbar machen möchtest.

2. Was mache ich, wenn ich das Blatt „Test1“ nicht finden kann?
Überprüfe, ob das Blatt möglicherweise umbenannt oder gelöscht wurde. Wenn es ausgeblendet ist, kannst du es wie oben beschrieben einblenden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige