VBAを使用してAccessでクエリのレポートを生成します。

Question

Microsoft Accessを使用しています。私はSQLクエリを持っています。 Select * from people

私は現在のコードをフォームボタンにフックしています。レポートを適切に生成するためにコードを修正するにはどうすればよいですか？

DoCmd.OpenQuery "PeopleSearch", acViewPreview 'open query 
DoCmd.SelectObject acQuery, "PeopleSearch" 
RunCommand acGenerateReport 

Answer 1

本当に近いです。それがどのように行われたかの例がここにあります。また、レポート作成の最後に照会をクローズしました。

Private Sub Command24_Click() 
On Error GoTo Err_Command24_Click 

    DoCmd.OpenQuery "PeopleSearch", acViewPreview 
    DoCmd.SelectObject acQuery, "PeopleSearch" 
    RunCommand acCmdNewObjectAutoReport 
    DoCmd.Close acQuery, "PeopleSearch" 

Exit_Command24_Click: 
    Exit Sub 

Err_Command24_Click: 
    MsgBox Err.Description 
    Resume Exit_Command24_Click 

End Sub