The Object doesn't contain the automation object "Status"

psamu

Active Member
Joined
Jan 3, 2007
Messages
462
Please help.

When I filter any field in access 2007 form I get warning message, but 2003 works fine.

"You tried to run a Visual Basic proceedure to set a property or method for an object. However, the component doesn't make the property or method available for automation operations"

" Check the components documentation for information on the properties and mehtods it makes available for Automation operations"

Thanks.
 

Excel Facts

Show numbers in thousands?
Use a custom number format of #,##0,K. Each comma after the final 0 will divide the displayed number by another thousand
Please help.

When I filter any field in access 2007 form I get warning message, but 2003 works fine.

"You tried to run a Visual Basic proceedure to set a property or method for an object. However, the component doesn't make the property or method available for automation operations"

" Check the components documentation for information on the properties and mehtods it makes available for Automation operations"

Thanks.

I'll bet you have the call in the event property but that it is a SUB and not a FUNCTION that is being called. Access 2007 got a bit tougher on that one. Change the Sub to Function and you should be okay.
 
Upvote 0
Thanks. I changed in the event properties in below instead of Sub to Function, now the form wont open and gives some message.

Private Sub Party_Enroll_Click()
On Error GoTo Err_Party_Enroll_Click

Dim stDocName As String
Dim stLinkCriteria As String

'stDocName = "Party Enroll"
stDocName = "Party"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Party_Enroll_Click:
Exit Sub

Err_Party_Enroll_Click:
MsgBox Err.Description
Resume Exit_Party_Enroll_Click

End Sub
 
Upvote 0
That one is a sub and should remain a sub. What I meant is that somewhere in the form, either in one of the form's events or one of its control's properties it has something like:

=HandleClick()

where HandleClick (that is just an example, not what I think you have in there) is a procedure that is currently defined as a Sub and should be a Function. Not event procedures but other subs that might be being called directly from a form event in the properties or control.
 
Upvote 0
Unable to find those, only I can see On key down I have an event proceedure
Private Sub MLS_Proj_KeyDown(KeyCode As Integer, Shift As Integer)
On Error Resume Next
Select Case KeyCode

Case 40
DoCmd.GoToRecord , , acNext
Case 38
DoCmd.GoToRecord , , acPrevious
End Select
End Sub



Private Sub Property_Name_KeyDown(KeyCode As Integer, Shift As Integer)
On Error Resume Next
Select Case KeyCode

Case 40
DoCmd.GoToRecord , , acNext
Case 38
DoCmd.GoToRecord , , acPrevious
End Select
End Sub



Private Sub Number_of_Transactions_KeyDown(KeyCode As Integer, Shift As Integer)

End Sub

Private Sub Remarks_KeyDown(KeyCode As Integer, Shift As Integer)
On Error Resume Next
Select Case KeyCode

Case 40
DoCmd.GoToRecord , , acNext
Case 38
DoCmd.GoToRecord , , acPrevious
End Select
End Sub
 
Upvote 0

Forum statistics

Threads
1,224,595
Messages
6,179,798
Members
452,943
Latest member
Newbie4296

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top