Check if any records exist in subform

[virencm]

Hi

How do i check if any records exist in a subform... if there are records then tick checkbox , else untick.

The code I 'm using doesnt seem to work

If IsNull(Me.Unissued_material_list_subform) Then
Me.Check92 = 0
Else
Me.Check92 = -1
End If

thanks.

 

[PeterF]

Your code fails because you are testing a subform, it's a control this means not null.

You need to test if the recordsource of the form contains records like:

 If Me.Unissued_material_list_subform.recordsource.Form.Recordset.RecordCount <> 0 then

 

[vbaInet]

Fyi: To get the correct name of the subform control, click on the subform ONCE and look in the Property Sheet. If you click on it a second time, it will take you to the form embedded in the subform control.

What you want is the name of the subform control.

 

[virencm]

Thanks Peter, Your solution worked perfectly

 

[mcfg]

I had the same question & came across this post. I found the below to work as well:

Me.Recordset.EOF

I tried that method as I was under impression .RecordCount property might not work if using a certain type of locktype (forward-only)