HOME > 即効テクニック > AccessVBA > フォーム・レポート > レポートの[ページ設定]ダイアログボックスを表示する

即効テクニック

フォーム・レポート

レポートの[ページ設定]ダイアログボックスを表示する

(Access 2000/2002)
レポートが表示されると同時に[ページ設定]ダイアログボックスも表示される方法を紹介します。


●操作手順●

*表示するレポートを用意してください。

(1)[ツール]メニューの[マクロ]-[VisualBasicEditor]をクリックして VisualBasicEditorを起動します。

(2)標準モジュールを挿入して、次のプロシージャを作成します。
Sub Sample()
    
    DoCmd.OpenReport "レポート名", acViewPreview
    
    DoCmd.RunCommand acCmdPageSetup
    
End Sub

(3)[Sub/ユーザーフォームの実行]ボタンもしくは、[実行]メニューの[Sub/ユーザーフォームの実行]をクリックします。

(4)レポートがプレビューで表示されて、[ページ設定]ダイアログボックスも表示されます。


● 補足説明 ●
[ページ設定]ダイアログボックスの[キャンセル]ボタンをクリックすると実行時エラーが発生します。
これを回避するためには、「DoCmd.RunCommand acCmdPageSetup」の前に次のコードを記述します。
RunCommandメソッドは、組み込みのメニューコマンドまたはツールバーコマンドを実行します。構文は次のとおりです。

[object.]RunCommand command

引数commandに指定できる定数については、ヘルプの「RunCommandメソッドの定数」を参照してください。
また、これらの定数は、オブジェクトブラウザでも表示できます。[プロジェクト/ライブラリ]ボックスで[Access]をクリックし、[クラス]リストで[AcCommand]をクリックします。