Seitenumbruch automatisch

Forumthread: Seitenumbruch automatisch
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Seitenumbruch automatisch

29.11.2005 16:06:46

Tom

Hallo,
durch Gruppierungen werden mehrere Spalten einer Tabelle ein - und ausgeblendet.
Wie kann ich erreichen (Makro?) dass automatisch der Seitenumbruch richtig eingestellt wird - alle angezeigten Spalten sollen auf das Blatt passen?
Gruß und Danke vorab
Tom

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Seitenumbruch automatisch

29.11.2005 16:12:10

Hajo_Zi
AW: Seitenumbruch automatisch

29.11.2005 16:15:41

th.heinrich

AW: Seitenumbruch automatisch

29.11.2005 16:12:10

Hajo_Zi

Hallo Tom,
Datei, Seite einrichten, Register Papierformat, Anpassen

AW: Seitenumbruch automatisch

29.11.2005 16:15:41

th.heinrich

hallo Tom,
probier mal dies.


Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
End Sub

mit ALT+F11 in die vba umgebung wechseln, im projekt-explorer (fenster links) auf DieseArbeitsmappe clicken und code reinkopieren.
gruss thomas