Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Ausdruck Tabellenblätter mit VBA

Ausdruck Tabellenblätter mit VBA
26.02.2008 12:29:46
alex
Hi,
kann mir jemand sagen, wie es möglich ist mit einem Makro von Tabelle 1 (per Schaltflächenbetätigung) aus, die Tabellenblätter 2-119; und zwar pro Tabellenblatt die Seiten 1 und 2; auszudrucken. Die Tabellenblätter sind mit Nachnamen bezeichnet. Wenn sie keinen Nachnamen als Bezeichnung haben, heißen sie wieder Tabelle... , eben mit der entsprechenden Nummer. Diese Tabellenblätter sollen nicht ausgedruckt werden, sondern nur die, die nicht mit "Tabelle" in der Bezeichnung beginnen.
danke,
alex

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ausdruck Tabellenblätter mit VBA
26.02.2008 12:43:12
Rudi
Hallo,
als Ansatz:
for each wks in workbooks
if not wks.name like "Tabelle*" Then wks.printout 1,2
next wks
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Ausdruck Tabellenblätter mit VBA
26.02.2008 13:12:00
alex
hallo rudi,
so hab ich das jetzt:

Sub ausdruckleb()
For Each wks In Workbooks
If Not wks.Name Like "Tabelle*" Then wks.PrintOut 1, 2
Next wks
End Sub


da druckt er aber nur die Seiten 1 und 2 der Tabelle 1.

Anzeige
AW: Ausdruck Tabellenblätter mit VBA
26.02.2008 13:14:00
Rudi
Hallo,
Tippfehler! Sorry
for each wks in worksheets
natürlich.
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Ausdruck Tabellenblätter mit VBA
26.02.2008 13:15:00
Wolli
For Each wks in ActiveWorkbook.Worksheets könnte besser klappen.
Gruß, Wolli

AW:Erledigt, danke
26.02.2008 13:51:50
alex
hat geklappt. war grausam...
bis ich die ganzen druckaufträge abgebrochen und den Drucker zum stehenbleiben gebracht habe.Puhh!
danke nochmal
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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