<div>
To base it on the form's recordset, try this in the Current Event of your form:<br />
<br />
<br />

<pre><code id="code-20-39231821-1">Private Sub Form_Current()
      dim rs as DAO.Recordset
      set rs = Me.RecordsetClone
       if rs.RecordCount &gt; 0 then
           rs.MoveLast
       end if
       Me.MyTextboxName = rs.Recordcount
End Sub</code></pre>
</div>


To base it on the form's recordset, try this in the Current Event of your form:




Private Sub Form_Current()
      dim rs as DAO.Recordset
      set rs = Me.RecordsetClone
       if rs.RecordCount > 0 then
           rs.MoveLast
       end if
       Me.MyTextboxName = rs.Recordcount
End Sub

<div>
In the Form.ApplyFilter event procedure<br />
<br />
Me.yourtextboxname = Me.RecordsetClone.RecordCo<wbr />unt
</div>


In the Form.ApplyFilter event procedure

Me.yourtextboxname = Me.RecordsetClone.RecordCount

<div>
<div class="content wysiwyg-content">
I have a textbox on a form which display the total record count in a table. &nbsp;But I also want to have a textbox on the form that shows the filtered record count on the form.<br />
<br />
Here's my default value code for the first textbox.<br />
<br />
=DCount(&quot;[ID]&quot;,&quot;tblImportR<wbr />ecords&quot;)<br />
<br />
But what would the code be for the filtered record count?<br />
<br />
Also, would it be in the afterupdate event of the form itself?
</div>
</div>


I have a textbox on a form which display the total record count in a table.  But I also want to have a textbox on the form that shows the filtered record count on the form.

Here's my default value code for the first textbox.

=DCount("[ID]","tblImportRecords")

But what would the code be for the filtered record count?

Also, would it be in the afterupdate event of the form itself?

How show filtered record count in a textbox on a form

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.