訪問VBA問題：更改查詢的功能被引用，根據上下文

Question

我在Access2007的自定義功能上抓取數據進行特定查詢的鉸鏈。它打開Outlook中，創建一個新的電子郵件，並填充與從查詢("DecisionEmail")採取的具體地址和數據的字段。 現在我想要做一個不同的查詢("RequestEmail")並將其填充數據的電子郵件。所以我所要做的就是改變這條線：

Set MailList = db.OpenRecordset("DecisionEmail") 

這就是我被困住的地方。

這是我想要的結果： 如果用戶是Form_Decision並按下按鈕"Send email"，"DecisionEmail"將得到插入功能和數據將出現在電子郵件。 如果用戶在Form_SendRequest上並單擊了按鈕"Send email"，則"RequestEmail"將被插入。 這些是不同查詢的原因是因爲它們包含非常不同的信息並且以不同的方式被弄髒。然而，由於它只是一個需要的功能代碼變化不大的事情，我不認爲一個全新的功能，是一個好主意。

我不得已將是使一個全新的功能和使用條件字段中宏界面之間進行選擇，但是我有一種感覺，有一個更優雅的解決方案成爲可能。

我必須設置查詢名稱作爲變量，使用If語句的模糊的概念，但我只是沒有通過這個思考精神的詞彙。

Answer 1

爲什麼不宏保存爲代碼，那麼你可以編輯客場實現說：

Function CustomEmail(NameOfQuery As String) 

    CurrentDB.Openrecordset(NameOfQuery) 

End Function 

然後，在需要的情況下每份表格上：

CustomEmail "DecisionEmail"