Abfrage ob Druckbereich zu groß für Seitenbreite

Bild

Betrifft: Abfrage ob Druckbereich zu groß für Seitenbreite
von: Martin Springer
Geschrieben am: 20.07.2008 19:07:17

Hallo liebe Excelianer,
gibt es eine Möglichkeit über VBA zu prüfen, ob der Druckbereich breiter ist als eine Seite? Mein Ansatz war eine Abfrage mit "ActiveSheet.PageSetup.FitToPagesWide", allerdings klappt es damit nicht. Für Vorschläge wäre ich sehr dankbar!
Viele Grüße
Martin Springer

Bild

Betrifft: AW: Abfrage ob Druckbereich zu groß für Seitenbreite
von: Daniel
Geschrieben am: 20.07.2008 19:39:09
Hi
mit activesheet.vpagebreaks.count kannst du abfragen, wieviele vertikale Seitenumbrüche deine Seite hat.
ist der Wert = 0, dann passt von der Breite her alles auf eine Seite.
Gruß, Daniel

Bild

Betrifft: AW: Abfrage ob Druckbereich zu groß für Seitenbreite
von: Martin Springer
Geschrieben am: 21.07.2008 08:55:32
Hallo Daniel,
leider hat das nicht funktioniert. Damit es mit activesheet.vpagebreaks.count klappt, muss die Ansicht vorher auf "ActiveWindow.View = xlPageBreakPreview" gesetzt werden. Der Wert von activesheet.vpagebreaks.count beträgt sonst auch bei Seitenumbrüchen im 0. Vielen Dank für den richtigen Ansatz!
Viele Grüße
Martin

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Abfrage ob Druckbereich zu groß für Seitenbreite"