Its not a big deal, but I have an entire application with one strSQL variable. You could also do
strSQL: = "Select ..."
CurrentDb.Execute strSQL, dbFailOnError
strSQL: = "Select ..."
CurrentDb.Execute strSQL, dbFailOnError
strSQL: = "Select ..."
CurrentDb.Execute strSQL, dbFailOnError
strSQL: =...