Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1605
  • Last Modified:

Access 2007 vba function runtime error 438. Object does not support this property or method

In the attached code, I making sure the user has entered data in each box.  The function is called from a save and exit function.  It all works except the section for Operator.   If the Operator box is empty, the message box is displayed as planned.  But then it crashes with the error message.

Microsoft Visual Basic
Runtime Error  '438'
Object does not support this property or method

When I select Debug it points to the line of code:
Me!Operator.SetFocus

Operator is the correct control source.

What am I looking for?
Thanks,
Brooks
Private Function CheckDataBeforeSaveAndExit() As Boolean
    If Me.Etch_Lot = "Select Etch Lot" Or IsNull(Me.Etch_Lot) Then
            MsgBox "Please select an etch lot number from the list."
            CheckDataBeforeSaveAndExit = False
            Me!Etch_Lot.SetFocus
    ElseIf IsNull(Me.Start_Qty) Then
            MsgBox "Please enter Start Quantity."
            CheckDataBeforeSaveAndExit = False
            Me!Start_Qty.SetFocus
    ElseIf IsNull(Me.End_Qty) Then
            MsgBox "Please enter End Quantity."
            CheckDataBeforeSaveAndExit = False
            Me!End_Qty.SetFocus
    ElseIf IsNull(Me.Furnace) Then
            MsgBox "Please select a furnace."
            Me!Frame39.SetFocus
            CheckDataBeforeSaveAndExit = False
    ElseIf IsNull(Me.Operator) Then
            MsgBox "Please select operator."
            Me!Operator.SetFocus
            CheckDataBeforeSaveAndExit = False
    Else
            CheckDataBeforeSaveAndExit = True
    End If

Open in new window

0
gbnorton
Asked:
gbnorton
  • 2
2 Solutions
 
Jeffrey CoachmanMIS LiasonCommented:
This is probably due to you keeping the default Control Names..
Please change the control names to follow a standard naming convention: (http://www.xoc.net/standards/default.asp)

The issue with leaving the default names is that the Control name is the same as the filed name.
While a control will have a .SETFOCUs property, a Filed will not.
(resulting in your error)

Note after changing all the control names:
Save the Form/Report.
Change the code to reflect the new names
Compile the code (In the VBA Editor click: Debug-->Compile)
The run the Compact/Repair utility, then retest..

;-)

JeffCoachman
0
 
pteranodon72Commented:
It looks like some of the controls on your form have the same name as their bound field (like Etch_Lot) and others are not named like the bound field (Frame39 is bound to field Furnace, it appears.)

If there is no Control on the form named Operator,  Me!Operator resolves to the Operator *Field*, which cannot have events attached.

Operator sounds like a reserved word, so I would rename the control to fraOperator or cboOperator, etc. in the Properties->Other tab. Keep the Control Source as Operator (as shown in the Data tab). Then use Me!Operator to refer to the value of the field and Me!cboOperator.SetFocus to refer to the control.

HTH,
pT72
0
 
gbnortonAuthor Commented:
I don't know if who's the quickest matters.  You both gave excellent responses.  Jeff was a little quicker...
0
 
Jeffrey CoachmanMIS LiasonCommented:
I have no problem with the split.

pteranodon72 gave an explanation for another technical viewpoint, which is always helpful.

;-)

JeffCoachman
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Get 10% Off Your First Squarespace Website

Ready to showcase your work, publish content or promote your business online? With Squarespace’s award-winning templates and 24/7 customer service, getting started is simple. Head to Squarespace.com and use offer code ‘EXPERTS’ to get 10% off your first purchase.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now