原创: Excel and Python
微 XIN 号: 实用办公编程技能
前几天,部门的小李说“年终总结报告总算做完了,幸好是会玩Excel让自己事半功倍!”
什么日报、周报、月报数据……汇总,全靠VBA编程进行Excel批量处理……
下面,我们就一起捋一捋:如何用Excel批量查找周报指定内容并导出?
![8db3baf978172a346e0369e2f3219358.png](https://i-blog.csdnimg.cn/blog_migrate/6a2f2d215105944bb43b0acbc417180c.jpeg)
![fd31051d4e9838347aa4f1e0cd98591c.gif](https://i-blog.csdnimg.cn/blog_migrate/a47ca3f3eb723a19c6296379ac4b79ee.gif)
那么,怎么用Excel的VBA编程去实现呢?
我们直接上干货!
第一步:定义变量,赋值变量
主要是定义文件操作及查找操作相关的变量。
![2bf52479f8f3cb9bc2c9ba537f99861e.png](https://i-blog.csdnimg.cn/blog_migrate/32b987e77062691350ea6c32449beab6.png)
第二步:用对话框获取文件夹地址,获取文件信息
主要使用WITH 语句创建文件打开对话框获取文件夹地址,使用Dir语句获取文件信息。
![921cae30e6e9f4772e636a18a9b75950.png](https://i-blog.csdnimg.cn/blog_migrate/b27559c27db5d77518746e64f489ac64.png)
第三步:清空行列内容,写入“列名”
主要使用ClearContents语句清除内容,并对单元格列名赋值。
![4ad7ab8ce6544bcf391c1f8e1f8070ef.png](https://i-blog.csdnimg.cn/blog_migrate/b908f5dbe270ccf760ce75a944a0f8eb.png)
第四步: 循环查找文件地址下的子文件,将查找结果导出
主要是使用Do…… While…… Loop循环查找文件地址下的子文件,用Find语句进行定位查找。
![26f92d1561e98e60c0b6ed2c1814e6f0.png](https://i-blog.csdnimg.cn/blog_migrate/c3bd4f034de3587e804ea2cbe041014c.jpeg)
第五步: 读取完成后输出提示信息
![7e632b8f9ec259b6723f3a1cd5b256cf.png](https://i-blog.csdnimg.cn/blog_migrate/63c8ecee1dbf31c7885365a16adb5009.png)
以上就是用Excel实现批量查找指定内容并导出的方法,下面给出具体的VBA代码供大家交流!
![953d28cc8c3195b14880c3d8486f7367.png](https://i-blog.csdnimg.cn/blog_migrate/e6a93dc579c8b6234c788dd7d1d10661.jpeg)
关注我们的公众号“实用办公编程技能”(微信号:Excel-Python),让我们的工作和生活变更更轻松。
![79687032a0916480e134196f9caf2065.png](https://i-blog.csdnimg.cn/blog_migrate/ea444072c8c80ac85452a7d71f2cfb7e.png)
往期文章:
1.Excel自动读取文件下的所有xls文件
2.Excel制作竞答倒计时器
3.用Excel倒计时还有多少天过年
4.用Excel做一个自动抽奖器
5.如何自己编写Excel函数并调用?
6.Excel玩转动态查找信息表
7.轻松搞定Excel的VBA编程
8.用Excel实现批量发送个性化邮件
9.玩转Excel的几个高频使用函数(七)
10.玩转Excel的几个高频使用函数(六)
11.玩转Excel的几个高频使用函数(五)
12.玩转Excel的几个高频使用函数(四)
13.玩转Excel的几个高频使用函数(三)
14.玩转Excel的几个高频使用函数(二)
15.玩转Excel的几个高频使用函数(一)