代码之家 › 专栏 › 技术社区 › AJ.

从Excel VBA浏览文件

excel vba fileopendialog excel-2003 excel-vba

3

AJ. · 技术社区 · 17 年前

如何从Excel中运行的VBA中打开“文件打开”对话框?

我正在使用Excel2003。

2 回复 | 直到 7 年前

1

9

tzot 17 年前

你想要 Application.GetOpenFilename 作用从VBA对象浏览器复制:

函数GetOpenFilename([FileFilter]、[FilterIndex]、[Title]、[ButtonText]、[MultiSelect])

2

Galwegian 17 年前

添加对ComDLG32.OCX的引用,然后添加类似于。。。

Sub PromptForFile()
Dim d As New MSComDlg.CommonDialog

d.Filter = "xls"
d.Filename = "*.xls"
d.ShowOpen

Excel.Workbooks.Open d.Filename

Set d = Nothing
End Sub