Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Seitennummer von Zelle ermitteln

Forumthread: Seitennummer von Zelle ermitteln

Seitennummer von Zelle ermitteln
09.10.2004 17:23:20
Zelle
Hallo,
wie kann ich de Seitennummer ermitteln, in der z.B. die Zelle (A90) gedruckt werden würde?
Ich benötige dieses um einen Druckbereich zusammenzuhalten , indem ich ggf. manuell einen Seitenumbruch vor deisem Bereich einfüge.
Danke für Hilfe,
Heinz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Seitennummer von Zelle ermitteln
09.10.2004 18:03:30
Zelle
Hallo Heinz,
diese Funktion tut's, sie ist aber sehr langsam in der Ausführung:

Function ZelleAufSeite(z As Range) As Integer
Dim i As Long, ze As Long
For i = 1 To ActiveSheet.HPageBreaks.Count
ze = ActiveSheet.HPageBreaks(i).Location.Row
If ze > z.Row Then
ZelleAufSeite = i
Exit Function
End If
Next i
ZelleAufSeite = i
End Function

Vorher muss auch noch die Seitenumbruchansicht aktiviert werden:
ActiveSheet.DisplayPageBreaks = True
Gruß Matthias
Anzeige
AW: Seitennummer von Zelle ermitteln
Zelle
? Gibts bei dir keine VPageBreaks?
Udo
AW: Seitennummer von Zelle ermitteln
09.10.2004 20:01:23
Zelle
Hallo Udo,
ja stimmt, ich hab vorausgesetzt, dass alles auf eine Seite (in der Breite) passt.
Hätte ich vielleicht dazuschreiben sollen.
Gruß Matthias
AW: Seitennummer von Zelle ermitteln
Zelle
Hallo,
wie stellst du dir das vor, willst du die Zelladresse irgendwo(und wenn ja, wo) eingeben,
oder die Zelle z.B. markieren?
Gruß K.Rola
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige