In MS Access VBA, how do I call a stored append query with parameters?

Question

In my Access 2007 database, I've got an append query with parameters in it. How do I call this query from a VBA script?

I realize that I could just generate the query text on the fly in the VBA code, but that's much more awkward.

HansUp · Accepted Answer · 2011-06-03 22:34:49Z

8

I got the following to work:

Dim db As DAO.Database
Dim qry As DAO.QueryDef

Set db = CurrentDb

Set qry= db.QueryDefs("NameOfMyStoredQuery")

qry.Parameters(0) = FirstParamValue
qry.Parameters(1) = SecondParamValue
qry.Parameters(2) = ThirdParamValue

qry.Execute

edited Jun 3, 2011 at 22:34

HansUp

97.3k11 gold badges80 silver badges139 bronze badges

answered Jun 3, 2011 at 21:44

Isaac Moses

1,6196 gold badges27 silver badges46 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Conrad Frix Over a year ago

You should also be able to use the Parameter names

HansUp Over a year ago

Also consider qry.Execute dbFailOnError and add an error hander to your procedure.

Collectives™ on Stack Overflow

In MS Access VBA, how do I call a stored append query with parameters?

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related