Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
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
1980to1984
1980to1984
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblätter drucken

Forumthread: Tabellenblätter drucken

Tabellenblätter drucken
02.07.2024 18:50:17
Thomas
Guten Abend miteinander :-)
mal wieder habe ich ein anliegen :-)

Wir haben eine Excel Datei mit 18 Tabellenblätter. 16 weitere Tabellenblätter sind ausgeblendet und alle ausgeblendete Tabellenblätter fangen mit AG_ an
AG_33322
AG_gd33
usw..
wäre es möglich über ein Button das alle Tabellenblätter mit AG aufzulisten und Über mehrere Selektion das dann die Tabellenblätter ( Spalte A bis H )herausdruckt.
Wichtig ist, das die Tabellenblätter immer ausgeblendet bleiben.

Ich hoffe, das es dafür eine Lösung gibt.

Besten Dank
Thomas
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter drucken
02.07.2024 20:13:29
Onur
Eine Frage nebenbei: Du heisst doch Thomas - ist Deutsch denn deine Muttersprache ?
AW: Tabellenblätter drucken
02.07.2024 20:17:33
Thomas
Hallo,

Ich komme aus Tschechien.
Wohne seit 3 Jahren in Deutschland.

Liebe Grüße
Thomas
AW: Tabellenblätter drucken
02.07.2024 20:20:48
Onur
Dann ist es ja ok. Nix für Ungut....
Poste bitte mal eine Datei, damit ich weiss, wie Alles aussieht.
2 bis 3 der "AG"-Blätter reichen.
Daten kannst du ja löschen, wenn du willst - oder aber anonymisieren.

Anzeige
AW: Tabellenblätter drucken
02.07.2024 20:33:52
Thomas
Hallo Onur,

anbei die Datei
https://www.herber.de/bbs/user/170630.xlsm

wir hatten vorher schon einen Button, der alle Blätter druckt.

Jetzt kommt leider die AG neu dazu. Ich hoffe, das der erste Button die AG nicht druckt. Denn das darf nur bei den zweiten Button mit der Auswahl funktionieren.
Danke für deine Hilfe
Anzeige
AW: Tabellenblätter drucken
02.07.2024 21:02:05
Alwin Weisangler
Hallo Thomas,

das wäre dann so ausreichend: 


Sub NurAGdrucken()

    Dim ws As Worksheet

    For Each ws In ThisWorkbook.Sheets

        If Left(ws.Name, 3) = "AG_" Then

            With ws

                .Visible = xlSheetVisible

                .Range("A:H").PrintOut ' Print columns A to H on each sheet

                .Visible = xlSheetHidden

            End With

        End If

    Next ws

End Sub


Gruß Uwe
Anzeige
AW: Tabellenblätter drucken
02.07.2024 21:14:58
Thomas
Hallo Uwe,

Danke für deine Hilfe.
Aber der Code würde jetzt alle AG drucken oder?
Irgendwann wären ca. 52 Tabellenblätter drin mit AG und drucken muss ich z.b. heute nur 5.
Dann drucken ich immer zu viele unnötige Blätter.

Danke schön
AW: Tabellenblätter drucken
02.07.2024 21:35:46
Alwin Weisangler
Da wäre die Möglichkeit in einem kleinen Userform via Listbox die zu druckenden Blätter zu selektierten und dann ausdrucken.

Würde das helfen?

Gruß Uwe
Anzeige
AW: Tabellenblätter drucken
02.07.2024 21:37:51
Thomas
Oh das wäre echt nice :)
AW: Tabellenblätter drucken
03.07.2024 13:08:30
Thomas
Super klappt klasse.

DANKE für Alles.
Anzeige
;

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