访问中的VBA：提示输入以选择要打印的报告

Question

我正在使用Access数据库并使用VBA编写了用于更新数据库的用户，然后将生成的报告打印到PDF。我现在想要允许打印两个报告中的一个的选项，具体取决于用户选择运行哪一个报告。

我知道我将不得不提示用户输入，最好通过下拉列表（我还没有想出如何操作，但Google似乎表明它是可行的）。我的问题是如何根据输入的内容获取执行打开报告的代码。

我对此有两点想法 - 我可以将它全部写入VBA，其中打印的报告取决于所选内容，或者可以绑定提示以运行将执行报告的两个宏之一。任何关于如何编写代码以允许用户输入的建议将不胜感激 - 或者如果我正在考虑完全倒退，我会很感激任何替代建议。

Answer 1

您可以使用输入框来要求用户选择一个数字来引用报告。如何完成这个例子如下。

Dim iAnswer 

iAnswer = InputBox("Enter in the number of the report you want to run" & vbCrLf & vbCrLf & "1) ReportName1" & vbCrLf & "2) ReportName2") 
    If iAnswer = 1 Then 
     'run macro to produce report 1 
    Else 
     If iAnswer = 2 Then 
      'run macro to produce report 2 
     Else 
      MsgBox "Not a valid report selection" 
     End If 
    End If