Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Verwenden Sie die Pages-Eigenschaft, um Informationen zurückzugeben, die zum Drucken von Seitenzahlen in einem Bericht erforderlich sind. Ganze Zahl mit Lese-/Schreibzugriff.
Syntax
Ausdruck verwendet werden. Seiten
Ausdruck Eine Variable, die ein Report-Objekt darstellt.
Hinweise
Diese Eigenschaft ist nur in der Seitenansicht oder beim Drucken verfügbar.
Um in einem Makro oder Visual Basic auf die Pages-Eigenschaft zu verweisen, muss das Formular oder der Bericht ein Textfeld enthalten, dessen ControlSource-Eigenschaft auf einen Ausdruck festgelegt ist, der Pages verwendet. Beispielsweise können Sie die ControlSource-Eigenschaft für ein Textfeld, das sich in einem Seitenfuß befindet, auf einen der folgenden Ausdrücke festlegen.
| Ausdruck | Druckt |
|---|---|
| =Seite | Eine Seitenzahl (z. B. 1, 2, 3) im Seitenfuß. |
| ="Seite" & Seite & "von" & Seiten | "Seite n von nn" (z. B. Seite 1 von 5, Seite 2 von 5) im Seitenfuß. |
| =Seiten | Die Gesamtzahl der Seiten im Formular (z. B. 5). |
Beispiel
Im folgenden Beispiel wird eine Meldung angezeigt, die angibt, wie viele Seiten der Bericht enthält. Damit dieses Beispiel funktioniert, muss der Bericht ein Textfeld enthalten, für das die ControlSource-Eigenschaft auf den Ausdruck gesetzt =Pagesist. Fügen Sie zum Testen dieses Beispiels den folgenden Code in das Ereignis "Seite " für das Formular "Alphabetische Liste der Artikel" ein.
Dim intTotalPages As Integer
Dim strMsg As String
intTotalPages = Me.Pages
strMsg = "This report contains " & intTotalPages & " pages."
MsgBox strMsg
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.