如何用VBA打开选择文件和选择路径的对话框

'在文件对话框对中返回选择一个文件夹的路径.Public Function ChooseFolder() As StringDim dlgOpen As FileDialogSet dlgOpen = Application.FileDialog(msoFileDialogFolderPicker)With dlgOpenIf .Show = -1 ThenChooseFolder = .SelectedItems(1)End IfEnd WithSet dlgOpen = NothingEnd Function'--------------------------------------------------------'在文件对话框对中，选择一个文件。

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/v2exyxejjxx2yyfvef7.html