Report. Pages-Eigenschaft (Access)Report.Pages property (Access)

Sie können die pages -Eigenschaft verwenden, um Informationen zurückzugeben, die zum Drucken von Seitenzahlen in einem Bericht benötigt werden.You can use the Pages property to return information needed to print page numbers in a report. Ganze Zahl mit Lese-/Schreibzugriff.Read/write Integer.

SyntaxSyntax

Ausdruck. Seitenexpression.Pages

Ausdruck Eine Variable, die ein Report -Objekt darstellt.expression A variable that represents a Report object.

BemerkungenRemarks

Diese Eigenschaft ist nur in der Seitenansicht oder beim Drucken verfügbar.This property is only available in Print Preview or when printing.

Um auf die pages -Eigenschaft in einem Makro oder in Visual Basic zu verweisen, muss das Formular oder der Bericht ein Textfeld aufnehmen, dessen ControlSource -Eigenschaft auf einen Ausdruck festgelegt ist, der Seitenverwendet.To refer to the Pages property in a macro or Visual Basic, the form or report must include a text box whose ControlSource property is set to an expression that uses Pages. Beispielsweise können Sie die ControlSource-Eigenschaft für ein Textfeld, das sich in einem Seitenfuß befindet, auf einen der folgenden Ausdrücke festlegen.For example, you can use the following expressions as the ControlSource property setting for a text box in a page footer.

AusdruckThis expression DruckePrints
= Seite=Page Eine Seitenzahl (z. B. 1, 2, 3) im Seitenfuß.A page number (for example, 1, 2, 3) in the page footer.
= "Seite" & Seite & "von" & Seiten="Page" & Page & "of" & Pages "Seite n von nn" (z. B. Seite 1 von 5, Seite 2 von 5) im Seitenfuß."Page n of nn" (for example, Page 1 of 5, Page 2 of 5) in the page footer.
= Seiten=Pages Die Gesamtzahl der Seiten im Formular (beispielsweise 5).The total number of pages in the form (for example, 5).

BeispielExample

Im folgenden Beispiel wird eine Meldung angezeigt, die angibt, wie viele Seiten im Bericht enthalten sind.The following example displays a message that tells how many pages the report contains. Damit dieses Beispiel funktioniert, muss der Bericht ein Textfeld aufnehmen, für das die ControlSource -Eigenschaft auf den Ausdruck =Pagesfestgelegt ist.For this example to work, the report must include a text box for which the ControlSource property is set to the expression =Pages. Um dieses Beispiel zu testen, fügen Sie den folgenden Code in das Page -Ereignis für das Formular alphabetische Liste der Produkte ein.To test this example, paste the following code into the Page event for the Alphabetical List of Products form.

Dim intTotalPages As Integer 
Dim strMsg As String 
 
intTotalPages = Me.Pages 
strMsg = "This report contains " & intTotalPages & " pages." 
MsgBox strMsg

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.