一段简单的vba问题

最近一直在学习python发现python确实好用,今后应该会主攻python和c#将主要用于我快速检验数据模型的时候写函数用。

之前答应过要一个小朋友辅导想了很久,没有比较好的简单易慬的案例昨天想了想,先写一个文件夹遍历的小程序吧主要是为了做个引子,同时我想她以后可能会遇到要打开某个文件夹里所有Excel的需求(比如找出每个excel中固定位置的值然后打印到当前excel中。)这个宏比较粗糙,作为入门案例比较容易懂

Excel的内容如下所示:

高亮的单え格用以输入目标文件夹的路径,如 C:\ , D:\MySQL\ 等等点击“查询”,则会将指定路径下所有的文件或者子文件夹的名字打印出来;清楚则会将该表嘚内容清除但是以上高亮单元格内的内容将被保留。

同时如果该文件夹不存在,也会报错:由于不存在D:\MySQL\a 这个文件夹因此该路径无效。

MsgBox ("指定路径下没有文件或文件夹哦!请检查是否漏写 \ 或者指定文件路径不正确!^_^") Exit Do '当MyFile为空的时候就说明已经遍历完了这时退出Do,否则还要運行一遍
判断是否存在C:\a.txt文件不存在则删除当前打开的Excel。... 判断是否存在C:\a.txt文件不存在则删除当前打开的Excel。

· 超过13用户采纳过TA的回答

这个过程不完全成功因为

删除它时,必须要关閉当前打开的excel文件但一关闭excel文件后,程序马上停止运行了

你对这个回答的评价是?

你的目的是什么呢你是想保护Excel文件?

“删除”太嚴厉了关闭还差不多。

如果你是自己用,应该没必要

给别人,人家禁用宏看你怎么办。

可以考虑动态生成一个vbs脚本(批处理更簡单),在Excel文档关闭之前启动这个脚本来完成删除任务就可以了。

你对这个回答的评价是

下载百度知道APP,抢鲜体验

使用百度知道APP立即抢鲜体验。你的手机镜头里或许有别人想知道的答案

我要回帖

更多关于 Excel vba教程 的文章

 

随机推荐