Argument not optional

[dawson321]

Hi,

I am writing some code for a database button but the error message argument not optional appears, saying that my OpenForm is incorrect. The code is below can any body help? Thanks.

Private Sub Command47_Click()
DoCmd.OpenForm.[tbljobs main]
DoCmd.GoToRecord , , acNewRec
DoCmd.ApplyFilter "jobs form search, , ,"
End Sub

 

[boblarson]

You need to use

DoCmd.OpenForm "tbljobs main"

 

[boblarson]

Also, if you are going to a new record you should not be trying to apply a filter as well.

 

[dawson321]

Thanks mate it working now

 

[dawson321]

Hi,

Having a problem with this code again. It worked but the filter in the code has stopped working and I can't figure out why, can you help? thanks.

DoCmd.OpenForm "tbljobs main"
DoCmd.GoToRecord , , acNewRec
DoCmd.ApplyFilter "jobs form search, , ,"

 

[dbDamo]

As boblarson has already said, if you are opening to a new record then you should not be trying to apply a filter as well.

You need to drop either the

DoCmd.GoToRecord , , acNewRec

or the

DoCmd.ApplyFilter "jobs form search, , ,"

Both are performing different filters which is why you aren't getting the results you expect - though I'm not sure what you're expecting the results to be anyway...

 

[dawson321]

Yea but if i just do the filter then other peoples information is visible in the back ground which is not suitable for confidentiality reasons.

 

[dbDamo]

Then drop the

DoCmd.GoToRecord , , acNewRec

EDIT - what happens if you perform the filter first and then go to a new record? i.e.

DoCmd.OpenForm "tbljobs main"
DoCmd.ApplyFilter "jobs form search, , ,"
DoCmd.GoToRecord , , acNewRec

 

[dawson321]

Yea but if i drop that bit of code then other clients information is visible in the background, while the user enters the search criteria.

 

[dbDamo]

Check out the edit note on my last post

 

[dawson321]

Dosen't work the filter still so not appear.

 

[boblarson]

Yea but if i drop that bit of code then other clients information is visible in the background.

Okay, first things first.

1. If you want to add a record to the filtered set, that is fine.

2. However, you need to apply the filter (and I would not use DoCmd.ApplyFilter, I would use the Me.Filter and Me.FilterOn code instead) and THEN go to a new record. You don't go to a new record and then apply the filter.

 

[dbDamo]

Can you zip up your db and upload it here, minus any sensitive data?

 

[dawson321]

Not letin me save it as a zip

 

[dawson321]

My computer not recognizing me.filter

 

[boblarson]

Not letin me save it as a zip

How are you doing it?

You would

1. Run Compact and Repair from the database.

2. Close the database

3. Right click on the file and select SEND TO > COMPRESSED FOLDER

That will zip it up.

 

[dawson321]

I have attached the folder to this message now