文章目录
使用Excel中的vba可以帮助我们批量的处理一些文件和文件夹,比如vba批量重命名移动复制删除文件夹,今天我们就来分享几个简单的程序,大家看一下就能懂,帮助我们批量的vba批量重命名移动复制删除文件夹,下面是具体的教程:
- dir函数判断文件夹是否存在:dir函数有两个参数,一个是文件夹的路径,第二个参数见下面第二幅图,他的意义已经在后面标注出来。下面这段程序的意思是如果在本Excel路径下没有找到文件夹“新建文件夹(2)”,那么就弹出消息框说没有该文件夹。
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/2f9cbdcc7cd98d10397b1a5c203fb80e7aec90f4.jpg)
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/77485536acaf2edd96315f848c1001e93801935f.jpg)
- mkdir函数可以创建文件夹:如图所示,它只有一个参数就是文件的路径,我们使用了本工作簿的路径,如图所示
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/4abae5edab64034fca54d36baec379310b551d86.jpg)
- rmdir函数可以删除文件夹:如图所示它只有一个参数,那就是文件夹的路径,它的一个应用案例如图所示:注意这个函数只能删除空文件夹,如果文件夹中有文件,那么函数就会提示错误
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/29790130e924b899710769556f061d950a7bf661.jpg)
- name函数重命名文件夹或者文件:它其实包括两个部分,As的前面是我们要命名的文件夹路径,As后面是命名后的文件夹路径
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/5af4d7ea15ce36d3c127905d3bf33a87e950b178.jpg)
- name函数移动文件夹或者文家:和上面的用法一样,只不过在写As后面的路径的时候我们把路径改成想要移动到的位置,比如对上面的代码进行修改就变成了移动文件夹:
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/0862c354564e92588f2d94839d82d158ccbf4e06.jpg)
- 使用filesystemobject对象来复制文件夹:注意这个写法有些不同,首先要创建一个对象,然后才能使用它的方法,copyfolder方法也有两个参数,两个参数用逗号隔开,前面是要复制的文件夹,后面是复制得到的文件夹路径
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/245e8bcad1c8a786ba0f57636609c93d70cf5072.jpg)
- 使用shell打开文件夹:我们用到了explore.exe应用程序,注意其后面有一个空格不能省略,后面是文件夹的路径,注意使用引号,然后最后是一个逗号和参数,各个参数不同,你自己尝试一下
![vba批量重命名 复制 删除文件夹:[6]Excel2013](/2016/08/01/vba%E6%89%B9%E9%87%8F%E9%87%8D%E5%91%BD%E5%90%8D%20%E5%A4%8D%E5%88%B6%20%E5%88%A0%E9%99%A4%E6%96%87%E4%BB%B6%E5%A4%B9%EF%BC%9A%5B6%5DExcel2013/bd7faf3533fa828bcef3818efc1f4134960a5a4f.jpg)
转载请注明来自DataScience.
邮箱: 675495787@qq.com