Excel vba写代码怎么找到文件夹的路径，并将路径填写在单元格指定单元格B1中

Set ShApp = CreateObject("Shell.Application")
Set mPath = ShApp.BrowseForFolder(0, "请选择需要操作的文件夹", 0, "")

Range("B1").Value = mPath.Self.Path

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

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