Another option is to have a table of SQL Strings and the call the SQL and run it from VBA - this can be good if you have a large amount of SQL strings to run.
Public Function RunQueriesFromTable(SQLSource As String)
DoCmd.SetWarnings False
Dim StartTime As Date
Dim EndTime As Date
Dim rstZ As...