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

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

2016/03/06 2016/03/09

FileDialog プロパティ

FileDialog オブジェクト を取得します。引数に、ダイアログボックスの種類を表す MsoFileDialogType 列挙型 の定数を指定します。
実際にダイアログボックスを表示したり、指定したファイルを開いたりするには、FileDialog オブジェクト の Show メソッド や Execute メソッド を使用します。
FileDialog オブジェクト に関する詳細は、「ファイル」のダイアログボックスを表示（FileDialog オブジェクト）を参照して下さい。

【書式】

object.FileDialog ( filedialogtype )

引数・戻り値

object ・・・対象となる Application オブジェクトを指定します。

filedialogtype ・・・ダイアログボックスの種類を表す MsoFileDialogType 列挙型の定数またはその値を指定します。

定数	値	内容
msoFileDialogOpen	1	「ファイルを開く」ダイアログボックス
msoFileDialogSaveAs	2	「名前を付けて保存」ダイアログボックス
msoFileDialogFilePicker	3	「参照」ダイアログボックス（ファイルを選択）
msoFileDialogFolderPicker	4	「参照」ダイアログボックス（フォルダを選択）

FileDialog プロパティ使用例

サンプルVBAソース

　
Sub Sample_FileDialogProperty()

    With Application.FileDialog(msoFileDialogOpen)
    
        .Filters.Clear
        .Filters.Add Description:="Excel ファイル", _
                     Extensions:="*.xlsx, *.xlsm"

        If .Show = -1 Then .Execute
        
    End With

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

　

Sub Sample_FileDialogProperty()

With Application.FileDialog(msoFileDialogOpen)

.Filters.Clear

.Filters.Add Description:="Excel ファイル", _

Extensions:="*.xlsx, *.xlsm"

If .Show = -1 Then .Execute

End With

End Sub

　

実行結果

Sample_FileDialogProperty を実行

「test.xlsx」を選択して「開く」をクリック

- Excel・ファイルの操作 Application オブジェクト, Excel・ファイルの操作, FileDialog オブジェクト, FileDialog プロパティ, MsoFileDialogType 列挙型, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

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

関連記事

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

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

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

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

: テキストファイル：データを読み込む（Input 関数・InputB 関数）

Input 関数・InputB 関数 Open ステートメントをシーケンシャル入 …

: ファイル属性の取得・設定（GetAttr 関数・SetAttr ステートメント）

ファイル属性の取得（GetAttr 関数）ファイルやフォルダ（ディレクトリ）の …

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

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

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

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

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

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

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

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

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

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

: 「ファイル」ダイアログボックスを表示・設定（FileDialog オブジェクト）

FileDialog オブジェクト FileDialog オブジェクトのメソッ …

PREV: FileDialogFilters コレクション・FileDialogFilter オブジェクト
NEXT: 「ファイル」ダイアログボックスを表示・設定（FileDialog オブジェクト）