FileDialog オブジェクトを取得する（FileDialog プロパティ）
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ソース
|
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」を選択して「開く」をクリック
関連記事
-
-
テキストファイル：データを読み込む（Get ステートメント）
Get ステートメント Open ステートメント をランダムアクセスモード（Ra …
-
-
テキストファイル（Open ステートメント・Close ステートメント）
新規ブックを開かずにテキストファイルを開く OpenText ステートメント を …
-
-
ファイルのタイムスタンプを取得（FileDateTime 関数）
ファイルのタイムスタンプを取得 ファイルのタイムスタンプを取得するには、File …
-
-
Excel を終了する（Quit メソッド）
Excel を終了する（Quit メソッド） Quit メソッドを実行すると、E …
-
-
ファイルを削除（Kill ステートメント）
ファイルを削除する ファイルを削除するには、Kill ステートメント を使用しま …
-
-
テキストファイル：出力する 1 行の幅を設定（Width # ステートメント）
Width # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
特殊フォルダを取得（wsh.SpecialFolders）
CreateObject 関数：特殊フォルダを取得（WSH.SpecialFol …
-
-
ファイルの検索・フォルダ内のファイル一覧を取得（Dir 関数）
Dir 関数 Dir 関数で、ファイルの存在を確認したり、指定したフォルダ内のフ …
-
-
テキストファイル：データを読み込む（Line Input # ステートメント）
Line Input # ステートメント Open ステートメントをシーケンシャ …
-
-
開いているファイルのサイズ・位置の取得（LOF 関数・Loc 関数）
LOF 関数 Open ステートメント により開かれたファイルのサイズをバイト単 …