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

関連記事

: 「名前を付けて保存」ダイアログボックスを表示（GetSaveAsFilename メソッド）

GetSaveAsFilename メソッド「名前を付けて保存」ダイアログボッ …

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

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

: EOF 関数

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

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

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

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

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

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

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

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

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

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

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

: ファイルのタイムスタンプを取得（FileDateTime 関数）

ファイルのタイムスタンプを取得ファイルのタイムスタンプを取得するには、File …

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

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

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