Application.GetOpenFilename 方法 (Excel)

會顯示標準的 [開啟舊檔] 對話方塊，並從使用者取得檔案的名稱，而無須實際開啟任何檔案。

語法

expression.GetOpenFilename (FileFilter、FilterIndex、Title、ButtonText、MultiSelect)

expression 代表 Application 物件的變數。

名稱	必要/選用	資料類型	描述
FileFilter	選用	Variant	會指定檔案篩選準則的字串。
FilterIndex	選用	Variant	指定預設檔案篩選條件的索引數字，從 1 到 FileFilter 指定的篩選條件數字。如果省略此引數或是此引數大於顯示的篩選條件數量，則會使用第一個檔案篩選條件。
Title	選用	Variant	指定對話方塊的標題。如果省略此引數，則標題為 "Open"。
ButtonText	選用	Variant	僅適用於 Macintosh。
MultiSelect	選用	Variant	True 表示可以選取多個檔案名稱。 False 表示只能選取一個檔案名稱。預設值為 False。

Variant

傳入 FileFilter 引數的這個字串組成是：檔案篩選條件字串，後面接著 MS-DOS 萬用字元的檔案篩選條件規格，並以逗號分隔每一組與每個部分。每個一組皆會列在 [檔案類型] 下拉式清單方塊中。例如，下列字串會指定兩個檔案篩選準則：text 和 addin：

"Text Files (*.txt), *.txt,Add-In Files (*.xla), *.xla"

若要使用多個 MS-DOS 萬用字元運算式組成單一檔案篩選類型，各萬用字元運算式之間需以分號分隔；例如："Visual Basic Files (*.bas; *.txt), *.bas;*.txt"。

如果省略 FileFilter，此引數會預設為 "All Files (*.*), *.*"。

這個方法會傳回選取的檔案名稱或使用者輸入的名稱。傳回的名稱可能包含路徑規格。如果 MultiSelect 為 True，傳回值將是一個選取的檔案名稱陣列 (即使只有選取一個檔案名稱)。如果使用者取消對話方塊會傳回 False。

這個方法可能會變更目前的磁碟機或資料夾。

本範例會顯示 [開啟舊檔] 對話方塊，以及設定給文字檔案的檔案篩選準則。如果使用者選擇檔案名稱，程式碼會在訊息方塊中顯示該檔案名稱。

fileToOpen = Application _ 
 .GetOpenFilename("Text Files (*.txt), *.txt") 
If fileToOpen <> False Then 
 MsgBox "Open " & fileToOpen 
End If

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