HOW TO:顯示開啟 Excel 檔案的對話方塊
下列程式碼會提示使用者在 Microsoft Office Excel 中開啟新的活頁簿。 這個程式碼會將各項屬性設定為允許複選、清除可用篩選條件清單,以及加入兩個新的篩選條件。 然後,這個程式碼會呼叫 FileDialog 物件的 Execute 方法,開啟要求的檔案。
**適用於:**本主題中的資訊適用於 Excel 2007 和 Excel 2010 的文件層級專案和應用程式層級專案。如需詳細資訊,請參閱依 Office 應用程式和專案類型提供的功能。
範例
With Me.Application.FileDialog(Microsoft.Office.Core.MsoFileDialogType.msoFileDialogOpen)
.AllowMultiSelect = True
.Filters.Clear()
.Filters.Add("Excel Files", "*.xls;*.xlw")
.Filters.Add("All Files", "*.*")
If .Show = True Then
.Execute()
End If
End With
Microsoft.Office.Core.FileDialog fd =
this.Application.get_FileDialog(Microsoft.Office.Core.MsoFileDialogType.msoFileDialogOpen);
fd.AllowMultiSelect = true;
fd.Filters.Clear();
fd.Filters.Add("Excel Files", "*.xls;*.xlw", missing);
fd.Filters.Add("All Files", "*.*", missing);
if (fd.Show() != 0)
{
fd.Execute();
}