Syntax

expression.RowCount

expression A variable that represents an OfficeDataSourceObject object.

Example

This example adds a new filter that removes all records with a blank Region field and then applies the filter to the active publication.

Visual Basic for Applications 
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
ofv ROW row count rowcount rowcount property

See also: