![](https://img-blog.csdnimg.cn/20201014180756927.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VBA
文章平均质量分 67
靠谱青年菜头
不想做开发的网络优化规划攻城狮不是好通信狗
展开
-
另存为xlsx文件
工具对于大量报告的生成,可以使用工具打开模板文件,添加数据、图片的信息后,另存为新的报告,然后关闭并不保存模板。’打开模板时,将打开动作设为隐藏'ActiveWorkbook.viseble = False '隐藏打开文件的动作’添加具体操作。。。'1.另存为文件夹名称对应的报告,51代表文件类型为.xlsx,例:"Site Design Rep原创 2016-09-26 16:25:55 · 1524 阅读 · 0 评论 -
选择路径后,遍历子文件夹
Sub opensubfolders()Dim i As IntegerDim subfolder As Integer'打开文件夹,查询子文件夹个数,用于计算生成报告的数量 Dim mpath$ '打开路径位置 ' Dim fso As FileSystemObject ' Dim mfolder As Folder ' Dim m原创 2016-09-26 16:34:09 · 319 阅读 · 0 评论