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

Forumthread: Bestimmtes Tabellenblatt drucken

Bestimmtes Tabellenblatt drucken
27.02.2007 18:12:51
Werner
Hallo zusammen,
ich habe in einer Arbeitsmappe ein Blatt, auf dem Eingaben gemacht werden und 15 Blätter, in die diese Daten übernommen werden sollen.
Über einem Button werden alle Blätter je zweimal ausgedruckt.
Jetzt hat sich herausgestellt, dass es sinnvoll wäre, neben diesem Gesamtausdruck auch mal ein Blatt alleine (das dann aber auch zweimal) auszudrucken.
Ich habe mir nun gedacht, das man das über ein DropDown-Feld mit den Namen der einzelnen Blätter machen könnte.
Also : Namen auswählen, Einzeldruck-Button klicken , fertig!
Ich schaffe es nicht, kann jemand helfen?
Gruß
Werner
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bestimmtes Tabellenblatt drucken
27.02.2007 18:34:12
Anfänger
Hallo Profi
Anfänger meint: Bordmittel von Excel zum Drucken verwenden
Grüsse vom Anfänger
AW: Bestimmtes Tabellenblatt drucken
27.02.2007 18:36:56
Werner
Herzlichen Dank, das hilft mir wirklich weiter.
AW: Bestimmtes Tabellenblatt drucken
27.02.2007 20:07:00
EtoPHG
Hallo Werner,
Also ehrlich gesagt sympathisiere zu einem gewissen Grad mit dem Anfänger.
Du bezeichnest Dich schliesslich als EXCEL Profi.
EXCEL Bordmittel:
1) Ich nehme an, das es kein Problem ist eine benannten Liste der Tabellenamen der Eigenschaft ListFillRange der ComboBox (aus der Steuerelement-Toolbox) zuzuordnen
2) Der Eigenschaft LinkedCell ordnest Du eine Zelle zu (z.B. A1)
3) Der Code für Deinen Button lautet nun:

Private Sub CommandButton1_Click()
Sheets(ActiveSheet.Cells(1, 1).Text).PrintOut
End Sub

Gruss Hansueli
Anzeige
AW: Bestimmtes Tabellenblatt drucken
27.02.2007 20:26:00
Werner
Herzlichen Dank,
und bei dem Profi habe ich mich "verklickt", Sorry.
Gruß
Werner
;
Anzeige
Anzeige

Infobox / Tutorial

Bestimmtes Tabellenblatt drucken mit Excel VBA


Schritt-für-Schritt-Anleitung

Um ein bestimmtes Tabellenblatt in Excel mit VBA zu drucken, folge diesen einfachen Schritten:

  1. Öffne Excel und lade die Arbeitsmappe, die das gewünschte Tabellenblatt enthält.

  2. Füge eine ComboBox (Dropdown-Feld) auf deinem Arbeitsblatt hinzu:

    • Gehe zu Entwicklertools > Einfügen > ComboBox (Formularsteuerelement).
  3. Erstelle eine benannte Liste mit den Namen der Tabellenblätter:

    • Gehe zu einem leeren Bereich in deinem Arbeitsblatt und gib die Namen der Blätter ein.
    • Wähle die Zellen aus und vergib einen Namen über das Namensfeld.
  4. Verknüpfe die ComboBox mit dieser Liste:

    • Klicke rechts auf die ComboBox, wähle Steuerelement formatieren, und setze bei ListFillRange den Namen deiner Liste ein.
  5. Verknüpfe eine Zelle mit der ComboBox:

    • Setze bei LinkedCell eine Zelle, z.B. A1.
  6. Füge einen Button hinzu:

    • Gehe wieder zu Entwicklertools > Einfügen > Schaltfläche (Formularsteuerelement).
  7. Füge den VBA-Code für den Button ein:

    • Rechtsklick auf den Button und wähle Code anzeigen. Füge folgenden Code ein:
    Private Sub CommandButton1_Click()
       Sheets(ActiveSheet.Cells(1, 1).Text).PrintOut
    End Sub
  8. Teste die Funktion:

    • Wähle einen Namen aus der ComboBox und klicke auf den Button. Das ausgewählte Tabellenblatt sollte jetzt gedruckt werden.

Häufige Fehler und Lösungen

  • Fehler: "Excel Tabellenblatt nicht drucken"

    • Stelle sicher, dass der Name des Blattes in der ComboBox exakt übereinstimmt.
  • Fehler: ComboBox zeigt keine Werte an

    • Überprüfe, ob die ListFillRange korrekt auf die benannte Liste verweist.
  • Fehler: Button funktioniert nicht

    • Prüfe, ob der VBA-Code korrekt eingegeben wurde und keine Syntaxfehler enthält.

Alternative Methoden

Eine alternative Methode, um ein bestimmtes Tabellenblatt zu drucken, ist die Verwendung der Excel Bordmittel:

  1. Wähle das gewünschte Blatt aus.
  2. Gehe zu Datei > Drucken und wähle die entsprechenden Druckoptionen.
  3. Klicke auf Drucken, um das Blatt direkt zu drucken, ohne VBA zu nutzen.

Praktische Beispiele

Hier ist ein einfaches Beispiel, wie der Druck eines bestimmten Tabellenblatts mit einem VBA-Skript aussehen kann:

Angenommen, du hast drei Tabellenblätter mit den Namen "Januar", "Februar" und "März". Wenn du den Namen "Februar" in der ComboBox auswählst und auf den Button klickst, wird nur das Februar-Blatt gedruckt.


Tipps für Profis

  • Nutze die PrintOut-Methode mit zusätzlichen Parametern, um den Druckprozess weiter anzupassen, z.B. Anzahl der Kopien oder spezifische Seiten:
    Sheets("Blattname").PrintOut Copies:=2, From:=1, To:=2
  • Erstelle eine Fehlerbehandlung im VBA-Code, um sicherzustellen, dass der Druckprozess reibungslos verläuft und mögliche Fehler abgefangen werden.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Blätter gleichzeitig drucken? Um mehrere Blätter zu drucken, kannst du eine Schleife in deinem VBA-Code einfügen, die durch die gewünschten Blattnamen iteriert und diese nacheinander druckt.

2. Was mache ich, wenn ich ein Blatt nicht drucken kann? Überprüfe die Druckereinstellungen und stelle sicher, dass das Blatt nicht ausgeblendet oder geschützt ist. Manchmal kann auch ein Neustart von Excel helfen.

Beliebteste Forumthreads (12 Monate)

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