1. 如何实现：编写vba 弹出文件对话框，并打开选中文件
Excel 开发人员参考
Application.Dialogs 属性
返回一个 Dialogs 集合，该集合表示所有内置对话框的。只读。
语法
表达式.Dialogs
表达式 一个代表 Application 对象的变量。
示例
本示例显示“文件”菜单的“打开”对话框。
Visual Basic for Applications
Application.Dialogs(xlDialogOpen).Show
搞一个事件引发Application.Dialogs(xlDialogOpen).Show 就会 弹出文件对话框
至于打开文件，要看你是这么打开的
2. Cad 用vba 二次开发 想知道怎么用打开文件对话框选择文件或者文件夹，获
我也想知道，Excel的VBA有一个Application.GetOpenFilename可以用，但是CAD的VBA找不到类似的方法和对象。
3. vba,怎么实现通过文件夹对话框选择想要选择的文件夹
代码如下：
SubGetFile()
DimFolderPickerAsObject
DimFilePathAsString
SetFolderPicker=Application.FileDialog(msoFileDialogFilePicker)
WithFolderPicker
.Filters.Clear
.Filters.Add"文本文件","*.txt"
If.Show=-1Then
FilePath=.SelectedItems(1)
Else
ExitSub
EndIf
EndWith
EndSub