VBA中如何将浏览按钮的文件选择改为文件夹选择？

原来的GetFilePath函数是用于选择文件的，要实现文件夹选择，你需要替换成专门的文件夹选择函数。以下是修改后的代码：

Case "Browse"
DlgText "path", BrowseForFolder("选择目标文件夹", "C:\")

说明： #

• BrowseForFolder是专门用于弹出文件夹选择对话框的函数，第一个参数是对话框标题，第二个参数是默认打开的路径（保留了你原来的C:\）。
• 替换后，点击浏览按钮时会弹出文件夹选择窗口，选中的文件夹路径会被填入path对应的输入框中。

如果你的环境中没有BrowseForFolder函数，也可以尝试给GetFilePath添加特定参数开启文件夹选择模式（部分开发环境支持）：

Case "Browse"
DlgText "path", GetFilePath(,"#FOLDER#","C:\","选择文件夹")

这里的#FOLDER#作为筛选参数，用于告知函数切换到文件夹选择模式，具体参数值需根据你使用的语言/工具文档确认，但优先推荐使用专门的文件夹选择函数，兼容性和可靠性更强。

内容的提问来源于stack exchange，提问作者Arun