Freigeben über


OfficeDataSourceObject.RowCount-Eigenschaft (Office)

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.