Seitenumbrüche löschen



Excel-Version: 8
nach unten

Betrifft: Seitenumbrüche löschen
von: Sven
Geschrieben am: 07.05.2002 - 03:27:03

Hallo allerseits,

mit der Recherche bin ich nicht weitergekommen ...

Wie kann ich alle Seitenumbrüche einer Tabelle löschen. Gefunden habe ich hier natürlich viel - aber das klappt wohl nur unter XL2000 - bei mir unter XL97 bekomme ich Laufzeitfehler.

Hier der Code:

Sub DelPageBreaks()
Dim i As Byte
For i = 1 To ActiveSheet.HPageBreaks.Count
      ActiveSheet.HPageBreaks(i).Delete
Next intakt
End Sub


Weiss hier irgendjemand weiter ?
nach oben   nach unten

Re: Seitenumbrüche löschen
von: Daniel P
Geschrieben am: 07.05.2002 - 07:32:28

Hallo Sven,

versuch mal

ActiveSheet.ResetAllPageBreaks

Daniel


nach oben   nach unten

Re: Seitenumbrüche löschen
von: Daniel P
Geschrieben am: 07.05.2002 - 07:33:22

Hallo Sven,

versuch mal

ActiveSheet.RemoveAllPageBreaks

Daniel


nach oben   nach unten

Re: Seitenumbrüche löschen
von: Uwe
Geschrieben am: 07.05.2002 - 08:19:36

Halo Sven,
hier mein Makro, welches ich auf einen Button gelegt habe.
Gruß Uwe

Sub SeitenUmbruchEinAus()
If ActiveSheet.DisplayPageBreaks = True Then
ActiveSheet.DisplayPageBreaks = False
Else
ActiveSheet.DisplayPageBreaks = True
End If
End Sub


nach oben   nach unten

Volltreffer
von: Sven
Geschrieben am: 07.05.2002 - 23:24:00

Super, genau das war es, was ich gesucht habe.

Danke nochmal.

Gruss Sven


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Datumsformat in msg-Box"