Zeile eines Seitenumbruch in Tabelle schreiben.
24.04.2018 10:23:45
Marco
mag mir bitte jemand helfen:
Ich möchte die Seitenumbrüche einer Tabelle auslesen und die entsprechende Zeile in das Tabellenblatt schreiben (lassen). Die Seitenumbrüche finde ich mit dem folgenden Makro. Wie kann dann die Zeile ausgeworfen werden (entweder direkt in die Zeile oder untereinander.(Das Makro ist von "Google")
Sub Test()
Dim pB As HPageBreak
Dim sh As Worksheet
Set sh = ActiveSheet
For Each pB In sh.HPageBreaks
MsgBox pB.Location.Address
Next pB
End Sub
DANKE!!!
Anzeige