5,172
社区成员
发帖
与我相关
我的任务
分享帮帮忙。关于调用office中的函数的问题
我在excel中想调用打开文件对话框，可是Application.FileDialog(msoFileDialogOpen).Show用这句话的时候却出错了。提示：对象不支持该属性或方法。可是大家都说是这样来调用的。
怎么回事？还望各位大虾赐教阿。
怎么回事？还望各位大虾赐教阿。
...全文
请发表友善的回复…
发表回复
沐NeMo 2004-09-27
- 打赏
- 举报
要引用 Microsoft Common Dialog Control 对象。
Dim dlog As New CommonDialog
With dlog
.DialogTitle = "选择一个文件"
.Filter ="*.txt" '对话框还有很多属性
.ShowOpen
End With
Dim dlog As New CommonDialog
With dlog
.DialogTitle = "选择一个文件"
.Filter ="*.txt" '对话框还有很多属性
.ShowOpen
End With
techgopher 2004-09-24
- 打赏
- 举报
你用的是2000吧，好像这个Application.FileDialog只有2002以上才有。只能用Application.Dialogs了：
application.Dialogs(xlDialogOpen).Show
application.Dialogs(xlDialogOpen).Show
