seitenumbruch



Excel-Version: 9.0 (2000)
nach unten

Betrifft: seitenumbruch
von: ron
Geschrieben am: 25.04.2002 - 14:25:29

Hi,
wie kann man alle bestehenden seitumbrüche eines sheet löschen und in jede 36.zeile einen seitenumbruch einfügen.

nach oben   nach unten

Re: seitenumbruch
von: Tobi@s
Geschrieben am: 29.04.2002 - 07:28:19

Hallöchen, Füge einfach folgendes Makro ein (über Extras / Makros): Sub Seitenwechsel() Cells.Select ActiveSheet.ResetAllPageBreaks I = 36 Do While I < 65536 Cells(I, 1).Select ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell I = I + 36 Loop End Sub Das dürfte eigentlich das Programm sein. Evtl. noch ein "Blatt-aktivieren"-Befehl einfügen, falls mit mehreren Blättern gearbeitet wird.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "seitenumbruch"