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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 「ファイルを開く」ダイアログボックスを表示（GetOpenFilename メソッド）

GetOpenFilename メソッドファイル名を取得するための、「ファイル …

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

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

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

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

: 特殊フォルダを取得（wsh.SpecialFolders）

CreateObject 関数：特殊フォルダを取得（WSH.SpecialFol …

: ディレクトリまたはフォルダの作成（MkDir ステートメント）

ディレクトリまたはフォルダの作成新しいディレクトリまたはフォルダを作成するには …

: ファイルの検索・フォルダ内のファイル一覧を取得（Dir 関数）

Dir 関数 Dir 関数で、ファイルの存在を確認したり、指定したフォルダ内のフ …

: テキストファイル（Open ステートメント・Close ステートメント）

新規ブックを開かずにテキストファイルを開く OpenText ステートメントを …

: 「ファイルを開く」ダイアログボックス（FindFile メソッド）

FindFile メソッド「ファイルを開く」ダイアログボックスを表示します。G …

: Open ステートメントで使用できるファイル番号を取得（FreeFile 関数）

FreeFile 関数 Open ステートメントで使用するファイル番号（ 1 ～ …

: Excel を終了する（Quit メソッド）

Excel を終了する（Quit メソッド） Quit メソッドを実行すると、E …

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