When the SQL SERVER is used as the database, and Access is the front-end application, this tip can help to dynamically change the Access pass through query definition. This enables one to pull necessary data from the server while avoiding redundant network traffic.
Private Sub ChangeQueryDefinition()
Dim dbs as Database
Dim strSQL as String
Dim strQuery as String
Dim strPassthroughQuery as String
Dim qDef as QueryDefinition
Set dbs=Currentdb()
strQuery=