Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender Navigationstipps
Inhaltsverzeichnis

Seitenumbruch abfragen für Inhaltsverzeichnis

Seitenumbruch abfragen für Inhaltsverzeichnis
18.02.2005 10:45:56
Bernhard
Hallo,
Ich erstelle mit dem folgenden Scrip ein Inhaltsverzeichnis, indem ich die Zellen von oben nach unten durchgehe, und alles was fett/unterstrichen ist auf ein anderes Blatt kopiere. Funktioniert gut. Nun hätte ich gerne die Seitenzahlen gem. aktuellem Umbruch dazu.
- wie frage ich die HPageBreaks ab?
- sind da auch die AutomaticPageBreaks mit dabei?
hier mein Code:
Do Until ActiveCell.Value = ""
If ActiveCell.Font.Bold And ActiveCell.Font.Underline = xlUnderlineStyleSingle Then
Selection.Copy
Sheets("Inhalt").Select
Bottom_Inhalt '-&gt sucht nächste freie Zeile
ActiveSheet.Paste
ActiveCell.Offset(0, -1).Select
ActiveCell.Value = ZA
ActiveCell.Offset(-1, 2).Select
ActiveCell.Value = PA
PA = 0
Sheets("aktuell").Select
ActiveCell.Offset(1, 0).Select
Else: ActiveCell.Offset(1, 0).Select
End If
If Selection.Font.Bold = False Then PA = PA + 1
ZA = ZA + 1
Loop

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

Betreff
Datum
Anwender
Anzeige
AW: Seitenumbruch abfragen für Inhaltsverzeichnis
Knut
- wie frage ich die HPageBreaks ab?
über: Location.Row
Knut
AW: Seitenumbruch abfragen für Inhaltsverzeichnis
18.02.2005 12:19:44
Bernhard
also etwa so:
Seitenzahl = Location.Row
?
AW: Seitenumbruch abfragen für Inhaltsverzeichnis
Knut
Du wolltest die Umbrüche abfragen, nun willst du die Seitenzahl?
Knut
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige