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

関連記事

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

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

: 開いているファイルの現在の読み取り位置または書き込み位置を取得（Seek 関数）

Seek 関数 Open ステートメントで開いたファイル内の現在の読み取り位置 …

: XlBuiltInDialog 列挙型

XlBuiltInDialog 列挙型 Excel の組み込みダイアログボックス …

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

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

: EOF 関数

EOF 関数 Open ステートメントをランダムアクセスモード（Random） …

: 開いているファイルの読み取り位置または書き込み位置を設定（Seek ステートメント）

Seek ステートメント Open ステートメントで開いているファイルで、次に …

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

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

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

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

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

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

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

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

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