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

Forumthread: Tabellenbereich auf 2 Seiten drucken

Tabellenbereich auf 2 Seiten drucken
14.05.2022 12:03:21
Ina
Hallo in das Forum,
ich möchte den Tabellenbereich B2:J111 ausdrucken, der auf 2 Seiten dargestellt werden soll.
Wie kann ich das per VBA erledigen?
Danke für eure Hilfe
LG Ina
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenbereich auf 2 Seiten drucken
14.05.2022 12:12:27
Nepumuk
Hallo ina,
teste mal:

Public Sub Drucken()
With ActiveSheet.PageSetup
.PrintArea = "B2:J111"
.Zoom = False
.FitToPagesTall = 2
.FitToPagesWide = 1
End With
Call Range("B2:J111").PrintOut
End Sub
Gruß
Nepumuk
AW: Tabellenbereich auf 2 Seiten drucken
14.05.2022 12:28:58
Ina
Hallo Nepumuk,
Danke schön, das klappt so weit perfekt.
Allerdings habe ich nicht bedacht, das der Bereich B56:J57 vom Druck ausgeschlossen werden soll und der Druck erst ab Zelle B58 auf Seite 2 weitergeführt werden sollte.
Ist es auch möglich, den Bereich B2:J55 auf Seite 1 drucken und den Bereich B58:J111 auf Seite 2?
LG Ina
Anzeige
AW: Tabellenbereich auf 2 Seiten drucken
14.05.2022 12:39:59
Nepumuk
Hallo ina,
dann so:

Public Sub Drucken()
With ActiveSheet.PageSetup
.PrintArea = "B2:J55"
.Zoom = False
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
Call Range("B2:J55").PrintOut
With ActiveSheet.PageSetup
.PrintArea = "B58:J111"
.Zoom = False
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
Call Range("B58:J111").PrintOut
End Sub
Gruß
Nepumuk
Anzeige
AW: Tabellenbereich auf 2 Seiten drucken
14.05.2022 12:50:52
Ina
Hallo, Nepumuk,
so klappt das perfekt!.
Vielen lieben Dank!
LG Ina
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
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