FileDialog.Show 方法 (Office)

顯示 [檔案] 對話方塊並傳回 Long，指出使用者是否按下 [動作] 按鈕 (-1) 或 [取消] 按鈕 (0)。 當您呼叫 Show 方法，使用者關閉對話方塊之前不會執行任何程式碼。 如果是 [開啟] 與 [另存新檔] 對話方塊，請在 Show 方法後立即執行 Execute 方法以執行使用者動作。

語法

expression.Show

需要 expression。 代表 FileDialog 物件的變數。

範例

下列範例會使用 FileDialog 物件顯示 [檔案選擇器] 對話方塊，並在訊息方塊中顯示每個選取的檔案。

Sub Main() 
 
 'Declare a variable as a FileDialog object. 
 Dim fd As FileDialog 
 
 'Create a FileDialog object as a File Picker dialog box. 
 Set fd = Application.FileDialog(msoFileDialogFilePicker) 
 
 'Declare a variable to contain the path 
 'of each selected item. Even though the path is aString, 
 'the variable must be a Variant because For Each...Next 
 'routines only work with Variants and Objects. 
 Dim vrtSelectedItem As Variant 
 
 'Use a With...End With block to reference the FileDialog object. 
 With fd 
 
 'Use the Show method to display the File Picker dialog box and return the user's action. 
 'The user pressed the button. 
 If .Show = -1 Then 
 
 'Step through each string in the FileDialogSelectedItems collection. 
 For Each vrtSelectedItem In .SelectedItems 
 
 'vrtSelectedItem is a string that contains the path of each selected item. 
 'Use any file I/O functions that you want to work with this path. 
 'This example displays the path in a message box. 
 MsgBox "The path is: " & vrtSelectedItem 
 
 Next vrtSelectedItem 
 'The user pressed Cancel. 
 Else 
 End If 
 End With 
 
 'Set the object variable to nothing. 
 Set fd = Nothing 
 
End Sub

另請參閱

• FileDialog 物件成員

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。