求大神分享能批量修改文件夹名的VBA，不胜感谢！

飞天篮球猪

powershell 命令：

gci 路径 -Directory -R | Rename-Item -NewName {'{0}\{1}-{2}' -f $_.Parent.FullName,$_.Parent.Name,$_.Name}

这个命令是批量把指定路径下的所有文件夹包含子文件夹命名为："父文件夹名-当前文件夹名"，比如 1-1,1-1-1,1-1-1-1...
把上述"路径"换成自己的文件夹路径.

命令也可以写在VBA里。