- '批量删除EXCEL文件里的程序部分
- '引用:Microsoft Visual Basic for Applications Extensibility 5.3
- '宏安全性里勾选"信任对于"Visual Basic项目"的访问(V)"
- Private Sub CommandButton1_Click()
- On Error Resume Next
- Set fso = CreateObject("Scripting.FileSystemObject")
- fname = ActiveWorkbook.Path & "/xls"
- Set fd = fso.getfolder(fname)
- Set fls &#
VBA EXCEL中删除存在的宏
最新推荐文章于 2024-07-05 08:53:58 发布
通过VBA编写宏,在Excel中批量删除指定文件夹内所有工作簿的程序部分。首先引用Microsoft Visual Basic for Applications Extensibility 5.3,然后设置FileSystemObject打开文件夹,遍历文件,逐个打开工作簿,删除每个工作簿的所有VB组件代码,并保存关闭,最后显示提示消息。确保宏安全性设置为信任VBA项目的访问。
摘要由CSDN通过智能技术生成