Report.FormatCount-Eigenschaft (Access)

Verwenden Sie die FormatCount-Eigenschaft , um zu bestimmen, wie oft die OnFormat-Eigenschaft für den aktuellen Abschnitt eines Berichts ausgewertet wurde. Ganze Zahl mit Lese-/Schreibzugriff.

Syntax

Ausdruck. FormatCount

Ausdruck Eine Variable, die ein Report-Objekt darstellt.

HinwBemerkungeneise

Verwenden Sie diese Eigenschaft nur in einer Ereignisprozedur , die durch die Einstellung der OnFormat-Eigenschaft eines Abschnitts angegeben wird.

Diese Eigenschaft ist in der Berichtsentwurfsansicht nicht verfügbar.

Microsoft Access erhöht die FormatCount-Eigenschaft jedes Mal, wenn die Einstellung der OnFormat-Eigenschaft für den aktuellen Abschnitt ausgewertet wird. Wenn der nächste Abschnitt formatiert ist, setzt Microsoft Access die FormatCount-Eigenschaft auf 1 zurück.

Unter bestimmten Umständen formatiert Microsoft Access einen Abschnitt mehrmals. Sie können beispielsweise einen Bericht entwerfen, in dem die KeepTogether-Eigenschaft für den Detailabschnitt auf Ja festgelegt ist. Wenn Microsoft Access das Ende einer Seite erreicht, formatiert es den aktuellen Detailabschnitt einmal, um zu prüfen, ob er passt. Wenn es nicht passt, wechselt Microsoft Access zur nächsten Seite und formatiert den Detailabschnitt erneut. In diesem Fall ist die Einstellung für die FormatCount-Eigenschaft für den Detailabschnitt 2, da sie vor dem Drucken zweimal formatiert wurde.

Verwenden Sie die FormatCount-Eigenschaft , um sicherzustellen, dass ein Vorgang, der sich auf die Formatierung auswirkt, nur einmal für einen Abschnitt ausgeführt wird.

Beispiel

Im folgenden Beispiel wird die DLookup-Funktion nur ausgewertet, wenn die FormatCount-Eigenschaft auf 1 festgelegt ist.

Private Sub Detail_Format(Cancel As Integer, _ 
 FormatCount As Integer) 
 Const conBold = 700 
 Const conNormal = 400 
 If FormatCount = 1 Then 
 If DLookup("CompanyName", _ 
 "Customers", "CustomerID = Reports!" _ 
 & "[Customer Labels]!CustomerID") _ 
 Like "B*" Then 
 CompanyNameLine.FontWeight = conBold 
 Else 
 CompanyNameLine.FontWeight = conNormal 
 End If 
 End If 
End Sub

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.