Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
16.04.2024 17:05:25
formatierten Text direkt in Zelle einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Seitenwechsel finden

Seitenwechsel finden
31.10.2003 11:12:47
Atikar
Hallo,

ein macro soll eine tabelle durchsuchen und die seitenumbrüche finden, um dann dort z.B. was zu schreiben.

hiermit finde ich den ersten scheinbar, aber wie sucht der weiter?

ActiveSheet.HPageBreaks(1).Location.Row

vielen dank im vorraus

ciao

atikar

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Seitenwechsel finden
31.10.2003 12:38:16
Monika Weber
Hallo atikar,

evtl. hilft Dir als Lösungsansatz etwas in der Art weiter:


Sub test()
Dim i As Integer
For i = 1 To ActiveSheet.UsedRange.Rows.Count + 1
If Rows(i).PageBreak <> xlNone Then
Rows(i).Interior.Color = vbRed
End If
Next i
End Sub


Es liebs Grüessli
Monika




Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige