Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Anzahl der Seiten einer Tabelle

Forumthread: Anzahl der Seiten einer Tabelle

Anzahl der Seiten einer Tabelle
13.01.2003 17:05:36
Estfeller Anton
With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 52
.PrintErrors = xlPrintErrorsDisplayed
End With

ich möchte in dieser prozedur für die anweisung '.FitToPagesTall = 52' den wert (52) autmomatisch ermitteln lassen, da das zu druckenden dokument immer variable seitenlänge hat. wie muss ich eine eventuelle variable definieren um die letzte seite eines dokumentes auszulesen und diese variable dann an stelle von 52 einsetzen kann

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Anzahl der Seiten einer Tabelle
13.01.2003 17:13:18
Bernd Held
Hallo Anton,
über folgendes "Alt-Makro" kannst du die voraussichtlichen Druckseiten ermitteln:

Sub DruckseitenZählen()
MsgBox "Diese Tabelle enthält " & _
ExecuteExcel4Macro("Get.Document(50)") & " Druckseiten!"
End Sub

Viele Grüße
Bernd
MVP für Microsoft Excel
Neue VBA-Bücher, neue FAQs und Makros unter: http://held-office.de

Anzeige
Re: Anzahl der Seiten einer Tabelle
13.01.2003 17:31:33
Anton Estfeller
habe meinen kodex so umgeändert:

With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = ExecuteExcel4Macro("Get.Document(50)")
.PrintErrors = xlPrintErrorsDisplayed
End With

und getestet - ich habe den eindruck es passt
danke für die rasche hilfe

gibt es sonst keine möglichkeit in excel die seitenanzahl, bzw. die letzte seite eines dokumentes festzulegen

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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