Seitenumbruch löschen
05.11.2008 16:24:00
KViertel
um Seitenumbrüche bei einer dynamischen Aufstellung zu löschen habe ich folgenden Code benutzt:
i = ActiveSheet.HPageBreaks.Count
For i2 = i To 1 Step -1
ActiveSheet.HPageBreaks(i2).Delete
Next
Ich erhalte hier aber immer wieder die Fehlermeldung Laufzeitfehler, außerhalb des Index.
z.B. i = 2, dann erhalte ich die Fehlermeldung schon, wenn i2 = 2 ist.
Reagiert der Befehl nur bei manuell gesetzten Umbrüchen?
Die Aufstellung wird per VBA erstellt. Dann sollen die Zeilenumbrüche an der richtigen Stelle gesetzt werden, was auch per VBA passiert. Um sicher zu gehen, dass keine Umbrüche von vorherigen Auswertungen mehr vorhanden sind, habe ich diesen Code an den Anfang meiner Routine gesetzt.
Weis jemand einen Grund?
MfG. Klaus