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.
Ruft eine lange, die die Anzahl der Datensätze in der angegebenen Datenquelle darstellt. Schreibgeschützt.
Syntax
Ausdruck. RowCount
Ausdruck Eine Variable, die ein OfficeDataSourceObject-Objekt darstellt.
Beispiel
In diesem Beispiel wird ein neuer Filter hinzugefügt, der alle Datensätze entfernt, in denen das Feld Region leer ist. Anschließend wird der Filter auf die aktive Publikation angewendet.
Sub OfficeFilters()
Dim appOffice As OfficeDataSourceObject
Dim appFilters As ODSOFilters
Set appOffice = Application.OfficeDataSourceObject
appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _
"UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees"
Set appFilters = appOffice.Filters
MsgBox appOffice.RowCount
appFilters.Add Column:="Region", Comparison:=msoFilterComparisonEqual, _
Conjunction:=msoFilterConjunctionAnd, bstrCompareTo:="WA"
appOffice.ApplyFilter
MsgBox appOffice.RowCount
End Sub
Siehe auch
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.