我有同樣的問題。我用for循環解決它。

例：

如果我想寫兩個相同的表，使用循環

for x = 0 to 1

 if x = 0 then TableToWrite = "Table1"

 if x = 1 then TableToWrite = "Table2"

  Sql = "INSERT INTO " & TableToWrite & " VALUES ('1','2','3')"

NEXT

或

ArrTable = ("Table1", "Table2")

for xArrTable = 0 to Ubound(ArrTable)

 Sql = "INSERT INTO " & ArrTable(xArrTable) & " VALUES ('1','2','3')"

NEXT

如果您有一個小查詢，我不知道這是否是最佳解決方案，但如果您的查詢非常大并且它位于具有if / else / case條件的動態腳本中，這是一個很好的解決方案。