vba 实现宏自杀
2012-04-25 11:49
295 查看
sub kill() '宏的自杀 ' ActiveWorkbook.Activate For i = 1 ToActiveWorkbook.VBProject.VBComponents.Count ActiveWorkbook.VBProject.VBComponents(i).CodeModule.DeleteLines 1, _ ActiveWorkbook.VBProject.VBComponents(i).CodeModule.CountOfLines Next end sub
相关文章推荐
- 用vba实现一个简单的对账系统(针对供应商的货物对账单)
- vba使用win32 API(GetOpenFileName )实现打开文件对话框
- vba使用win32 API(GetOpenFileName )实现打开文件对话框
- VBA实现任意n阶幻方的一种填法(n≥3)
- 通过VBA实现Excel批量克隆单元格
- 强贴---不用VBA实现Excel单元格连动下拉选择
- vba调用AutoItX3的Activex控件,实现doc2Html源码
- Office VBA用WinAPI实现“另存为”对话框
- Excel 中使用 VBA 控制多个透视表(pivot table)的实现
- VBA实现Outlook自动发送带附件带签名的工作周报
- 用VBA实现excel与access数据库交互
- 用VBA实现OUTLOOK接收新邮件后的自动转发
- excel通过vba实现智能提示功能小结
- vba编程不知道该使用什么对象属性方法实现操作的时候用宏录制来查阅代码
- 在WORD中用VBA实现光标移动与内容选择(转)
- vba使用win32 API(GetOpenFileName )实现打开文件对话框
- 在 VBA host 中实现 Sleep() 函数
- excel宏实现自动排名vba代码
- 在WORD中用VBA实现光标移动与内容选择
- Vba中Listview控件隔行换色的三种实现方式