Access 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"