Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

Excel の組み込みダイアログボックス（Dialog, Dialogs）

2016/03/21

Excel の組み込みダイアログボックスを表示

Dialog オブジェクト を使用して、Show メソッドを実行します。

【書式】

object.Dialogs[.Item]( const ).Show [ ( Arg1, Arg2, Arg3, ……, Arg30 ) ]

引数・戻り値

object ・・・対象となる Application オブジェクトを指定します。
const ・・・組み込みダイアログボックスを表すXlBuiltInDialog 列挙型の定数またはその値を指定します。
Arg1 … Arg30 ・・・引数 const で指定した組み込みダイアログボックスの初期値を設定するための引数の値を指定します。設定する引数の詳細については、組み込みダイアログボックスの引数一覧を参照してください。
戻り値・・・ブール型（Boolean）の値。組み込みダイアログボックスで、ユーザーが、[OK] をクリックをした場合には True を返し、[キャンセル] をクリックをした場合には False を返します。

Dialog.Show メソッド使用例

サンプルVBAソース 1

　
Sub Sample_Dialogs1()

    '「ファイルを開く」ダイアログボックスを表示
    '初期設定で、「C:\Documents\test.xlsx」を選択
    Application.Dialogs(xlDialogOpen).Show arg1:="C:\Documents\test.xlsx"

End Sub

1

2

3

4

5

6

7

8

9

　

Sub Sample_Dialogs1()

'「ファイルを開く」ダイアログボックスを表示

'初期設定で、「C:\Documents\test.xlsx」を選択

Application.Dialogs(xlDialogOpen).Show arg1:="C:\Documents\test.xlsx"

End Sub

　

実行結果 1

サンプルVBAソース 2

　
Sub Sample_Dialogs2()

    '「ページ設定」ダイアログボックスを表示
    '初期設定で、ページ中央寄せ（水平、垂直）に設定
    Application.Dialogs(xlDialogPageSetup).Show arg9:=True, arg10:=True

End Sub

1

2

3

4

5

6

7

8

9

　

Sub Sample_Dialogs2()

'「ページ設定」ダイアログボックスを表示

'初期設定で、ページ中央寄せ（水平、垂直）に設定

Application.Dialogs(xlDialogPageSetup).Show arg9:=True, arg10:=True

End Sub

　

実行結果 2

- Excel・ファイルの操作 Application オブジェクト, Dialog オブジェクト, Dialogs コレクション, Dialogs プロパティ, Excel・ファイルの操作, Show メソッド, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: テキストファイル：データを読み込む（Line Input # ステートメント）

Line Input # ステートメント Open ステートメントをシーケンシャ …

: 組み込みダイアログボックスの引数一覧

組み込みダイアログボックスの引数一覧 Excel の組み込みダイアログボックスを …

: テキストファイル：データを書き込む（Write # ステートメント）

Write # ステートメント Open ステートメントをシーケンシャル出力モ …

: FileDialog オブジェクトを取得する（FileDialog プロパティ）

FileDialog プロパティ FileDialog オブジェクトを取得しま …

: ファイルサイズを取得（FileLen 関数）

ファイルサイズを取得ファイルのサイズ（バイト数）を取得するには、FileLen …

: ファイルをコピー（FileCopy ステートメント）

FileCopy ステートメントファイルをコピーします。ただし、開いているファ …

: Excelでテキストファイルを開く（OpenText メソッド）

Excelでテキストファイルを開く OpenText メソッドで、テキストファイ …

: テキストファイル：データを読み込む（Get ステートメント）

Get ステートメント Open ステートメントをランダムアクセスモード（Ra …

: ファイルを削除（Kill ステートメント）

ファイルを削除するファイルを削除するには、Kill ステートメントを使用しま …

: テキストファイル：出力する 1 行の幅を設定（Width # ステートメント）

Width # ステートメント Open ステートメントをシーケンシャル出力モ …

PREV: 組み込みダイアログボックスの引数一覧
NEXT: フルパスからファイル名、パスを取得する