■レポートをプレビューで開く

DoCmd.OpenReport "レポート名", acViewPreview

■レポートを印刷

DoCmd.OpenReport "レポート名"

■レポートを閉じる

DoCmd.Close acReport, "レポート名"

■一時的にフィルターをかけて、レポートを開く

DoCmd.OpenReport "レポート名",,"[氏名] = '山田 一郎'"

第３ﾊﾟﾗﾒｰﾀにＳＱＬを指定します。上記例では、ソースデータの氏名フィールドが山田一郎だけを抽出します。

■印刷データが無いときの処理例

MsgBox "印刷するデータはありません。"
Cancel = True

ﾚﾎﾟｰﾄｲﾍﾞﾝﾄの「空データ時」に上記命令を付け加える