Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
116to120
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
116to120
116to120
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

seitenumbruch

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

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: seitenumbruch
29.04.2002 07:28:19
Tobi@s
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.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige