Home > 即効テクニック > AccessVBA > フォーム・レポート > レポートの倍率を指定してプレビューする

即効テクニック

フォーム・レポート

レポートの倍率を指定してプレビューする

(Access 2000/2002/2003)
● 概要 ●
構文  expression.RunCommand(Command)


設定項目        内容
expression      ApplicationオブジェクトまたはDoCmdオブジェクト[省略不可]
Command         AcCommandクラスの定数を指定[省略不可]

レポートのプレビュー画面で、プレビューの倍率を指定します。
RunCommandメソッドの引数に、以下の定数を指定します。

・引数に指定する定数(AcCommandクラス)

定数	         説明
acCmdZoom10	倍率10%
acCmdZoom25	倍率25%
acCmdZoom50	倍率50%
acCmdZoom75	倍率75%
acCmdZoom100	倍率100%
acCmdZoom150	倍率150%
acCmdZoom200	倍率200%
acCmdZoom500	倍率500%
acCmdZoom1000	倍率1000%


● サンプル ●
Sub ZoomSample()
    '[社員名簿]レポートを開く
    DoCmd.OpenReport "社員名簿", acViewPreview
    'プレビュー画面の倍率を75%にする
    DoCmd.RunCommand acCmdZoom75
End Sub