Problem setting a Form variable

[mustangarcher]

Hello. I am trying to set an object variable to a 'datasheet form' that I have so that I can manipulate the column widths programmically. I am doing it in exactly the same way that I am doing it for another 'datasheet form'. With one, it works perfectly, with the other, I cannot set the variable. I get an "Object Required" error. But there does not seem to be any differences in the forms, and the code is exactly the same. Here is the code (that causes the error):

Private Sub Child274_Enter()
Dim frm As Form
Set frm = Form_frmtblObsoleteParts
 
MsgBox frm.chrObsoletePN.ColumnWidth
MsgBox frm.chrPartRevision.ColumnWidth
MsgBox frm.chrMakeBuy.ColumnWidth
MsgBox frm.chrQtyOnHand.ColumnWidth
MsgBox frm.chrQtyOnOrder.ColumnWidth
MsgBox frm.chrCostPart.ColumnWidth
MsgBox frm.chrTotalPrice.ColumnWidth
 
End Sub

[NeoPa]

Where is the error message and what line does it occur on?

[mustangarcher]

It is:
Run-time error '424'
Object Required

Occurs on line 3 of the code when I try to set the variable. It is acting as if the form does not exist. But it does.

Thanks,
Mike

[mustangarcher]

It is working now. I looked at the VBA project, and there was no object for it there. So I created an open event and deleted it just so that there would be an object for the form in the VBA project. Now it is working fine.

[NeoPa]

You've already found the first point I was going to make. The properies of the form include one called .HasModule (Near the bottom of the list). Set this to Yes if you want a module to be associated with it (Obviously your approach works too).

When referring to an open form it is more common (and more precise) to do so via the Forms() collection :

Forms("frmtblObsoleteParts")

or :

Forms!frmtblObsoleteParts

Form_frmtblObsoleteParts is, technically, a reference to the class rather than the instance.

Referring to Items on a Sub-Form gives further details.

[mustangarcher]

Very useful... Thank you very much.