Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

runtime error 424

Posted on 2001-08-10
8
Medium Priority
?
266 Views
Last Modified: 2008-03-03
What is run time error 424 object required mean?
I type this code to event on click
   Private Sub Invoice_No_Enter()
Dim FindInvoiceNo As Integer
FindInvoiceNo = Text1.Value
Me.RecordsetClone.FindFirst "[invoiceNo] = " & FindInvoiceNo
Me.Bookmark = Me.RecordsetClone.Bookmark

End Sub

When I run it show the message above and I press debug  It has yellow highlight on line 3

This code i want to move record in form by follow what I put in textbox. Ex If I type 131 into textbox which is name invoice no, the record in form should change too.
But the problem is nothing change accept subform.  The subform change to detail of  invoice no 131 but name and address and so on still not change

Could help me.  I am not good about code   could tell me detail step by step     THANK YOU
0
Comment
Question by:ftmkay
8 Comments
 
LVL 6

Expert Comment

by:devtha
ID: 6372722
Is there a text1 on the form. If so just use text1
0
 
LVL 12

Expert Comment

by:Paurths
ID: 6372734
hi ftmkay ,

try this

Private Sub Invoice_No_Enter()
Dim FindInvoiceNo As Integer
FindInvoiceNo = me.Text1
Me.RecordsetClone.FindFirst "[invoiceNo] = " & FindInvoiceNo
Me.Bookmark = Me.RecordsetClone.Bookmark

End Sub
0
 
LVL 6

Expert Comment

by:devtha
ID: 6372742
if you use me then type me!text1
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 6

Expert Comment

by:PsychoDazey
ID: 6372800

Private Sub Invoice_No_Enter()
Dim FindInvoiceNo As String
FindInvoiceNo = Me.[Text1].Value
Me.RecordsetClone.FindFirst "[invoiceNo] = " & FindInvoiceNo
Me.Bookmark = Me.RecordsetClone.Bookmark
0
 
LVL 6

Expert Comment

by:devtha
ID: 6372812
:-)
0
 
LVL 44

Expert Comment

by:Arthur_Wood
ID: 6372882
I have never seen anyone use the RecordSetClone property of a form in that manner.  Usually a local recordset object is created, and then set equal to the Form's recordsetClone, like this


Private Sub Invoice_No_Enter()

Dim rsLocal as Recordset
Dim FindInvoiceNo As Integer

FindInvoiceNo = Text1.Value
Set rsLocal = Me.RecordSetClone
rsLocal.FindFirst "[invoiceNo] = " & FindInvoiceNo
Me.Bookmark = rsLocal.Bookmark

End Sub
0
 
LVL 54

Expert Comment

by:nico5038
ID: 6994532
for ftmkay

It's time to clean up this TA, so I will leave a recommendation in Community Support that this question is:
 - PAQ'd and pts removed
Please leave any comments here within the
next seven days.

PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER !

Nic;o)
0
 
LVL 5

Accepted Solution

by:
Netminder earned 0 total points
ID: 7014586
Per recommendation, points NOT refunded and question closed by
Netminder
CS Moderator
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

You need to know the location of the Office templates folder, so that when you create new templates, they are saved to that location, and thus are available for selection when creating new documents.  The steps to find the Templates folder path are …
If you need a simple but flexible process for maintaining an audit trail of who created, edited, or deleted data from a table, or multiple tables, and you can do all of your work from within a form, this simple Audit Log will work for you.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
Suggested Courses

971 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question