HOME > 即効テクニック > Excel VBA > ページ設定関連のテクニック > [ページ設定]ダイアログボックスを表示する

即効テクニック

ページ設定関連のテクニック

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

(Excel 97)
●詳細●
Excel97VBAでは、約200種類の組み込みダイアログボックスをDialogsプロパティで開く事ができます。
サンプルマクロでは、[ページ設定]ダイアログボックスを表示します。

●準備●
標準モジュールに次のマクロを作成してください。
●サンプル●
Sub Sample()
    Dim myRtn As Boolean
    
    myRtn = Application.Dialogs(xlDialogPageSetup).Show
    
    If myRtn = False Then
        MsgBox "[キャンセル]が選択されました"
    Else
        MsgBox "ページ設定が行われました"
    End If
    
End Sub
●補足説明●
Showメソッドは、組み込みダイアログボックスで[OK]ボタンがクリックされるとTrueを返し、[キャンセル]ボタンをクリックするとFalseを返します。
サンプルマクロでは、それを利用して、処理を分岐してメッセージボックスを表示しています。