automatischer Abschluß- Rahmen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: automatischer Abschluß- Rahmen von: Georg Burk
Geschrieben am: 11.02.2005 09:27:21

Hallo,

ich möchte daß in Excel XP automatisch auf jeder Seite unten vor dem Seitenumbruch ein Rahmenlinie gezogen wird, so als Abschluß quasi.

Kann mir bitte jemand weiterhelfen?

Schöne Grüße

Georg

Bild


Betrifft: Seitenumbrüche ermitteln von: Boris
Geschrieben am: 11.02.2005 09:37:58

Hi Georg,

die Zeilen der Seitenumbrüche erhälst du wie folgt:

Option Explicit


Sub machs()
Dim hPb As HPageBreak
For Each hPb In ActiveSheet.HPageBreaks
    MsgBox hPb.Location.Row
Next hPb
End Sub


Und jetzt nur noch jeweils eine Linie ziehen...

Grüße Boris


Bild


Betrifft: AW: Seitenumbrüche ermitteln von: Georg Burk
Geschrieben am: 11.02.2005 09:52:06

Hallo Boris,

danke für deine Hilfe.

Leider kommt bei Starten der Routine immer ein Laufzeitfehler 9 -Index außerhalb des gültigen Bereichs.

Könnte man die Linie ebenfalls mit VBA zeichnen lassen?

Schöne Grüsse

Georg


Bild


Betrifft: Laufzeitfehler 9? von: Boris
Geschrieben am: 11.02.2005 10:21:30

Hi Georg,

sorry - kann ich mir nicht erklären.
Und natürlich kann man auch eine Linie zeichnen - stellt sich nur noch das Problem, wie lang die Linie sein muss.
Aber bei VBA-gut dachte ich, dass du das selbst hinbekommst ;-)

Grüße Boris


 Bild

Beiträge aus den Excel-Beispielen zum Thema "automatischer Abschluß- Rahmen "