Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
780to784
780to784
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aktuelle Zeile auf manuellem Seitenumbruch?

Forumthread: Aktuelle Zeile auf manuellem Seitenumbruch?

Aktuelle Zeile auf manuellem Seitenumbruch?
11.07.2006 19:20:53
Gregor
Hallo Profis
Habe folgendes Problem:
Ich möchte mit VBA abfragen, ob auf der aktuellen Zeile ein manueller Seitenumbruch eingefügt worden ist.
Meine Archiv-Recherche war leider erfolglos!
Kann mir jemand helfen?
Vielen Dank.
Gregor
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aktuelle Zeile auf manuellem Seitenumbruch?
11.07.2006 20:27:48
K.Rola
Hallo,
Verständnisfrage, wozu brauchst du die Information?
Option Explicit

Sub manueller_Umbruch()
Dim p As Integer, ash As Worksheet
Set ash = ActiveSheet
Application.ScreenUpdating = False
ActiveWindow.View = 2
If ash.HPageBreaks.Count > 0 Then
For p = 1 To ash.HPageBreaks.Count
If ash.HPageBreaks(p).Type = xlPageBreakManual Then
If ActiveCell.Row = ash.HPageBreaks(p).Location.Row Then
MsgBox "Markierte Zeile hat manuellen Umbruch!"
Exit For
End If
End If
Next
End If
ActiveWindow.View = 1
Application.ScreenUpdating = True
End Sub

Gruß K.Rola
Anzeige
AW: Aktuelle Zeile auf manuellem Seitenumbruch?
12.07.2006 08:13:31
Gregor
Hallo K.Rola
Merci für deine Hilfe.
Grüsse Gregor
AW: Aktuelle Zeile auf manuellem Seitenumbruch?
12.07.2006 14:41:20
Gregor
Hallo Andreas
Das war's! Merci für die kompetente Hilfe.
Grüsse
Gregor
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige