2014-07-24 4 views
-1

VBA에서 쿼리를 실행하고 싶지만 쿼리를 사용자에게 표시하지 않습니다. VBA 코드가 결과를 가져 와서 양식에 표시 할 수 있도록 실행하고 싶습니다. 어떤 제안?Access VBA에서 숨겨진 쿼리 실행

+0

코드를 컴파일하고 사용자에게 mde 또는 accde를 제공합니까? 그렇다면 삶은 매우 쉬워집니다. – Fionnuala

답변

-3

나는

당신은 docmd.setwarnings를 사용할 수 있습니다 "... 당신은 3 개 레코드를 업데이트하려고합니다"당신이 사용자의 예에 표시되는 메시지 상자를 싶지 않는 가정

DoCmd.SetWarnings False 
DoCmd.OpenQuery "Your Query Name", acViewNormal, acEdit 
DoCmd.SetWarnings True 
+0

업데이트가 아니라 선택 쿼리입니다. – PhilHibbs

+0

이것이 OP가 요구하는 것과 관련이 없다고 생각합니다 ... – Brad

+0

DoCmd.SetWarnings False는 올바른 오류 처리를 위해 좋은 충고 또는 적절한 대체품이 아닙니다. – tahwos

1

내가했습니다 대다수가 내 자신의 질문에 대답했다.

Dim dbs As DAO.Database 
Dim qdf As DAO.QueryDef 
Dim rst As DAO.Recordset 
Set dbs = CurrentDb 
Set qdf = dbs.QueryDefs("GetVisitDetails") 
qdf.Parameters("[Forms]![Visitor Management]![VRN]") = 1 
Set rst = qdf.OpenRecordset() 

내가 다음 레코드 집합을 사용할 수 있습니다 http://msdn.microsoft.com/en-us/library/office/ff820966%28v=office.15%29.aspx이 큰 도움이되었다, 여기 내 코드입니다. 이제 양식에서 가치를 얻는 방법을 알아야합니다.

관련 문제