Print a record on a subform

[Khalil Handal]

Hi to all,

I have a main form (frmMembersInfo) with a combo box. The user selects a name from the combo box and data is shown on the subform (frmMembersInfoSubForm), The control name of the subform is (cntMembersInfoSubForm).
On the main form I have a button to print the data on the subform for the selected person.

below is the code:

If Len(Me.[frmMembersInfoSubForm].txtFirstName & "") = 0 Or Len(Me.[frmMembersInfoSubForm].txtFamilyName & "") = 0 Then
         MsgBox "Please select a member, " & vbCrLf _
                & "before attempting to preview the report." & vbCrLf _
                & vbInformation, "Personal Information Needed..."

        Exit Sub
    Else
        If Me.Dirty = True Then  'Save the record
           Me.Dirty = False
        End If

        DoCmd.OpenReport "rptMemberReportInfo", view:=acViewPreview, _
              WhereCondition:="[pkMemberId] = " & Me.[frmMembersInfoSubForm].pkMemberId 
    End If

The If Len(Me.... has an error. I am not able to find it out. Any help is appreciated

Khalil

[Bob Fitz]

The If Len(Me.... has an error. I am not able to find it out. Any help is appreciated

What error message or error number do you get

[Bob Fitz]

Try:
If Len(Me.[frmMembersInfoSubForm].txtFirstName) = 0 Or Len(Me.[frmMembersInfoSubForm].txtFamilyName) = 0 Then

[Khalil Handal]

Hi,

Did not work.
Here is the error message I have:
Error 2465: can't find the field '|1' refered to in your expression

[Bob Fitz]

Do you get that message with your code or mine.
Have you spelt the names of the text boxes correctly.

[Bob Fitz]

I didn't read your OP as carefully as I might have.
Try:
If Len(Me.[cntMembersInfoSubForm].txtFirstName) = 0 Or Len(Me.[cntMembersInfoSubForm].txtFamilyName) = 0 Then

[Khalil Handal]

I tried your code and got the following:

Compile error: Method or data member not found

with yellow highlight on txtFirstName

[Bob Fitz]

That suggests to me, that there is no control on the subform with that name.

[Micron]

Len(Me.cntMembersInfoSubForm.Form.txtFirstName) = 0 Or Len(Me.cntMembersInfoSubForm.Form.txtFamilyName) = 0 ?

Here's how I troubleshoot hierarchies like this:
In the immediate window drill down and test a property of the objects as you go. Probably every object has a name, so
?Me.Name << should give you the name of the active form
?Me.cntMembersInfoSubForm.Name << according to what I read in the posts, should return cntMembersInfoSubForm. Never mind that it tells you what you already know; it tells you you're on the right track.
?Me.cntMembersInfoSubForm.txtFamilyName << should fail because the textbox is not the next object in the hierarchy - the FORM on the subform would be next?
?Me.cntMembersInfoSubForm.Form.Name should return the name of the subform in the subform container.
and so on...

[Khalil Handal]

Hi,

I tried this in the immediate window:

?Me.Name
frmMembersInfo_New

?Me.cntMembersInfoSubForm.Name
cntMembersInfoSubForm

?Me.cntMembersInfoSubForm.txtFirstName
ERROR: Method or data member not found.

I think it is not finding the control on the subform.

[Bob Fitz]

Did you not try:
Me.cntMembersInfoSubForm.Form.txtFirstName
As Micron suggested in post #9

[Khalil Handal]

This worked for me:

Me.cntMembersInfoSubForm!txtFamilyName

Thanks to All