Application.FileDialog プロパティ (Excel)Application.FileDialog property (Excel)

ファイル ダイアログ ボックスの 1 つのインスタンスを表す FileDialog オブジェクトを取得します。Returns a FileDialog object representing an instance of the file dialog.


expression. FileDialog( _fileDialogType_ )

expressionApplication オブジェクトを表す変数です。expression A variable that represents an Application object.


名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
fileDialogTypefileDialogType 必須Required MsoFileDialogTypeMsoFileDialogType ファイル ダイアログの種類です。The type of file dialog.


| MsoFileDialogTypeには、これらのMsoFileDialogType定数のいずれかを指定できます |。|msoFileDialogFilePicker| MsoFileDialogType can be one of these MsoFileDialogType constants.| | msoFileDialogFilePicker. ユーザーがファイルを選択できます |。|msoFileDialogFolderPickerAllows user to select a file.| | msoFileDialogFolderPicker. ユーザーがフォルダーを選択します |。|msoFileDialogOpenAllows user to select a folder.| | msoFileDialogOpen. ユーザーがファイルを開くことができます |。|msoFileDialogSaveAsAllows user to open a file.| | msoFileDialogSaveAs. ユーザー ファイルを保存することができます |。Allows user to save a file.|


この例では、1 つまたは複数のファイルを選択するユーザーを許可するファイルのダイアログ ボックスが開かれます。In this example, Microsoft Excel opens the file dialog allowing the user to select one or more files. これらのファイルを選択すると、各ファイルのパスを別のメッセージで表示されます。Once these files are selected, Excel displays the path for each file in a separate message.

Sub UseFileDialogOpen() 
    Dim lngCount As Long 
    ' Open the file dialog 
    With Application.FileDialog(msoFileDialogOpen) 
        .AllowMultiSelect = True 
        ' Display paths of each file selected 
        For lngCount = 1 To .SelectedItems.Count 
            MsgBox .SelectedItems(lngCount) 
        Next lngCount 
    End With 
End Sub

関連項目See also

Application オブジェクトApplication Object