<div>
Thank you!!<br />
<br />
Derek
</div>


<div>
You could also use the Form_Open event to determine whether there are any records in the form.<br />
<br />
Private Sub Form_Open(Cancel As Integer)<br />
<br />
&nbsp; &nbsp; Cancel = (Me.RecordsetClone.RecordC<wbr />ount = 0)<br />
&nbsp; &nbsp; <br />
End Sub<br />
<br />
However, if you use this technique, you will need to handle the error that occurs when you cancel the form_Open event. &nbsp;This would have to be done in the routine that calls the form, so it is better to simply test before hand.
</div>


You could also use the Form_Open event to determine whether there are any records in the form.

Private Sub Form_Open(Cancel As Integer)

    Cancel = (Me.RecordsetClone.RecordCount = 0)
   
End Sub

However, if you use this technique, you will need to handle the error that occurs when you cancel the form_Open event.  This would have to be done in the routine that calls the form, so it is better to simply test before hand.

<div>
<div class="content wysiwyg-content">
Can I find out if a form HasData before I try to open it ?<br />
<br />
I have tried this<br />
<br />
If Me.Forms!AppointmentsAll.H<wbr />asData = -1 Then<br />
&nbsp; &nbsp; DoCmd.OpenForm &quot;AppointmentsAll&quot;<br />
End If<br />
<br />
It doesn't work<br />
<br />
Derek
</div>
</div>


Can I find out if a form HasData before I try to open it ?

I have tried this

If Me.Forms!AppointmentsAll.HasData = -1 Then
    DoCmd.OpenForm "AppointmentsAll"
End If

It doesn't work

Derek

Has Data

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.