2017-08-16 47 views
0

我正在使用Access數據庫並使用VBA編寫了用於更新數據庫的用戶,然後將生成的報告打印到PDF。我現在想要允許打印兩個報告中的一個的選項,具體取決於用戶選擇運行哪一個報告。訪問中的VBA:提示輸入以選擇要打印的報告

我知道我將不得不提示用戶輸入,最好通過下拉列表(我還沒有想出如何操作,但Google似乎表明它是可行的)。我的問題是如何根據輸入的內容獲取執行打開報告的代碼。

我對此有兩點想法 - 我可以將它全部寫入VBA,其中打印的報告取決於所選內容,或者可以綁定提示以運行將執行報告的兩個宏之一。任何關於如何編寫代碼以允許用戶輸入的建議將不勝感激 - 或者如果我正在考慮完全倒退,我會很感激任何替代建議。

回答

0

您可以使用輸入框來要求用戶選擇一個數字來引用報告。如何完成這個例子如下。

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