Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Seitenumbruch läßt sich nicht verschieben

Seitenumbruch läßt sich nicht verschieben
03.11.2005 10:16:30
Holger
Hallo,
ich habe folgendes Problem mit Excel / VBA:
ich möchte Seitenumbrüche in einer VBA-Funktion verschieben.
Hierzu habe ich das Beispiel aus der VBA-Hilfe versucht:
Worksheets(1).HPageBreaks(1).Location = Worksheets(1).Range("E5")'
Allerdings erhalte ich nur, dass der Inhalt aus der Zelle "E5" in die Zelle, auf die der Seitenumbruch verweist (HPageBreaks(1).Location.Address) kopiert wird.
Weiss jemand woran das liegt, oder ob ich etwas einstellen muß?
Im Prinzip erhalte ich Daten aus der Zwischenablage, die ich dann automatisch formatieren möchte: das Blatt soll im Querformat sein, die Breite soll auf eine bestimmte Spalte eingestellt werden, die Anzahl der Reihen richtet sich nach einem Schlüsselwort in der ersten Spalte.
Alle Versuche die Seitenumbrüche zu verschieben führten leider zu keinem Erfolg.
MfG
Holger
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Seitenumbruch läßt sich nicht verschieben
03.11.2005 10:29:26
ingoG
Hallo Holger,
obige syntax setzt vorraus, dass es schon einen Seitenumbruch gibt.
versuchs mal so:

Sub aaaa()
Worksheets(1).HPageBreaks.Add Worksheets(1).Range("e5")
End Sub

Gruß Ingo
PS eine Rückmeldung wäre nett...
AW: Seitenumbruch läßt sich nicht verschieben
03.11.2005 10:37:52
holger
Hallo Ingo,
Der Seitenumbruch existiert, lässt sich aber wie gesagt nicht verschieben.
Wenn ich einen neuen (manuellen) Seitenumbruch einfüge, dann bleibt der automatisch erzeugte Seitenumbruch erhalten und lässt sich auch nicht löschen.
Ich habe bereits probiert, einen neuen Umbruch einzufügen, den alten Umbruch in einen manuellen Typ umzuwandeln und dann zu löschen - aber ebenfalls ohne Erfolg.
MfG
Holger
Anzeige
AW: Seitenumbruch läßt sich nicht verschieben
03.11.2005 10:52:04
ingoG
Hallo Holger,
ist denn der bestehende seitenumbruch vor oder nach zeile 5?
wenn er vorher ist, wird er nat. immer nur bis zum ende der physikalischen Seite drucken können.
Da mußt du an anderen Schräubchen drehen...
am besten zeichnest Du mal über den VBA-Recorder den Vorgang auf:
Datei / Seite einrichten /Papierformat,Skalierung 1 Seite Breit, 1 Seite hoch
fertig
Ich hoffe, ich habe dein Prob richtig verstanden ;-)
Gruß Ingo
PS eine Rückmeldung wäre nett...

Anzeige
AW: Seitenumbruch läßt sich nicht verschieben
03.11.2005 11:50:40
Holger
Hallo Ingo,
danke für die Erinnerung an den Makro-Editor.
Konnte nun mein problem lösen:
1. Um einen Seitenumbruch zu verschieben muss man die neue Zuwesiung mit 'Set' vornehmen, also z.B.:
Set ActiveSheet.VPageBreaks(1).Location = ActiveSheet.Range("E5")
2. Ich wollte einen vertikalen Umbruch ganz nach rechts verschieben. Dies ist allerdings nicht möglich. Den Umbruch löschen kann man aber auch nicht. Es ist hier nur möglich, den Umbruch mit der Methode .DragOff (...) aus dem druckbereich herauszuschieben.
An Ingo vielen Dank für die Anregungen und allen anderen mehr Glück im Umgang mit Seitenumbrüchen.
MfG
Holger
Anzeige
Danke für die Rückmeldung oT
03.11.2005 11:58:52
ingoG
.
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Seitenumbruch in Excel verschieben: So geht's


Schritt-für-Schritt-Anleitung

Um einen Seitenumbruch in Excel zu verschieben, kannst Du die folgende Schritt-für-Schritt-Anleitung nutzen:

  1. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Neues Modul einfügen: Klicke auf Einfügen > Modul.

  3. Code einfügen: Füge den folgenden VBA-Code ein, um den Seitenumbruch zu verschieben:

    Sub SeitenumbruchVerschieben()
       Set ActiveSheet.VPageBreaks(1).Location = ActiveSheet.Range("E5")
    End Sub
  4. Makro ausführen: Schließe den VBA-Editor und führe das Makro über Entwicklertools > Makros aus.

  5. Überprüfen: Überprüfe, ob der Seitenumbruch korrekt verschoben wurde.

Diese Methode funktioniert in Excel-Versionen, die VBA unterstützen.


Häufige Fehler und Lösungen

  • Seitenumbruch lässt sich nicht verschieben: Stelle sicher, dass der Seitenumbruch existiert und dass Du die richtige Syntax verwendest. Wenn der Umbruch vor der Zelle ist, die Du verschieben möchtest, wird er möglicherweise nicht verschoben.

  • Excel Seitenumbruch entfernt sich nicht: Um einen bestehenden Seitenumbruch zu entfernen, kannst Du diesen Befehl verwenden:

    ActiveSheet.VPageBreaks(1).Delete
  • Umbruchvorschau funktioniert nicht: Wenn die Umbruchvorschau nicht angezeigt wird, gehe zu Seitenlayout und aktiviere die Umbruchvorschau.


Alternative Methoden

Wenn der Seitenumbruch in Excel weiterhin Probleme bereitet, gibt es alternative Methoden:

  1. Manuelles Einfügen: Füge manuell einen neuen Seitenumbruch ein, indem Du die Zeile oder Spalte auswählst und dann Seitenlayout > Umbrüche > Seitenumbruch einfügen wählst.

  2. Seitenlayout anpassen: Gehe zu Seitenlayout und passe die Druckbereich-Einstellungen an, um die Seitenumbrüche zu steuern.

  3. Druckbereich ändern: Durch das Anpassen des Druckbereichs kannst Du verhindern, dass Excel automatisch Seitenumbrüche erstellt oder verschiebt.


Praktische Beispiele

  • Beispiel 1: Wenn Du einen Seitenumbruch zwischen Zeile 10 und 11 verschieben möchtest, kannst Du den folgenden Code verwenden:

    Set ActiveSheet.HPageBreaks(1).Location = ActiveSheet.Rows(10)
  • Beispiel 2: Um einen vertikalen Umbruch zu verschieben, der sich nicht einfach löschen lässt, benutze:

    ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, Count:=1

Diese Beispiele helfen Dir, die Funktionsweise von Seitenumbrüchen in Excel besser zu verstehen.


Tipps für Profis

  • Drücke ALT + F10, um die Umbruchvorschau schnell zu aktivieren oder zu deaktivieren.
  • Nutze den VBA-Recorder, um Deine Aktionen aufzuzeichnen und den generierten Code zu studieren.
  • Teste verschiedene Druckformate: Manchmal kann das Format die Sichtbarkeit von Umbrüchen beeinflussen. Überprüfe die Einstellungen unter Seitenlayout.

FAQ: Häufige Fragen

1. Warum lässt sich der Seitenumbruch nicht verschieben?
Das kann daran liegen, dass der Umbruch vor der ausgewählten Zelle ist oder die falsche Syntax verwendet wurde. Überprüfe die VBA-Syntax und die Position des Umbruchs.

2. Wie entferne ich einen bestehenden Seitenumbruch?
Du kannst einen Seitenumbruch entfernen, indem Du den folgenden VBA-Befehl verwendest:

ActiveSheet.VPageBreaks(1).Delete

3. Was mache ich, wenn die Umbruchvorschau nicht angezeigt wird?
Gehe zu Seitenlayout und aktiviere die Umbruchvorschau, um sicherzustellen, dass sie angezeigt wird.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige