[ページ設定]ダイアログボックスを表示する
 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を返します。
 サンプルマクロでは、それを利用して、処理を分岐してメッセージボックスを
表示しています。

Excel97



戻る


Excel Word Access VBA! モーグ