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

関連記事

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

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

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

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

: FileDialogFilters コレクション・FileDialogFilter オブジェクト

FileDialogFilters コレクション FileDialog オブジェ …

: ディレクトリまたはフォルダの削除（RmDir ステートメント）

ディレクトリまたはフォルダの削除ディレクトリまたはフォルダを削除するには、Rm …

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

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

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

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

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

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

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

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

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

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

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

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

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