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

関連記事

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

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

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

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

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

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

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

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

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

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

: 開いているファイルのサイズ・位置の取得（LOF 関数・Loc 関数）

LOF 関数 Open ステートメントにより開かれたファイルのサイズをバイト単 …

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

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

: フルパスからファイル名、パスを取得する

フルパスからファイル名のみを取得するフルパスからファイル名を取得するには、Di …

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

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

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

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

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