如何用vba函数删除word中的宏

sixcet6

我用vba函数在word中写了几个宏，当宏完成任务后，我想通过代码删除宏，怎么能、实现呢 谢谢

[此贴子已经被作者于2002-11-6 10:54:02编辑过]

守柔

这个问题注意：VBA不是函数，VBE是后台VB代码编辑器，它是专门针对或者面向APPLICATION的一个编辑工具（Visual Basic For Applications)，在WORD中，Application就是WORD自身，Excel中Application 就是Excel 这个应用程序。

通过代码删除代码或者是代码删除自身以及代码全部自杀等，需要通过信任对于VB项目的访问（宏安全性选项中的可靠来源）。

以下代码示例为删除活动文档所有代码：

Sub KillAllMacrs() Dim i As Object,a as Integer For Each i In ActiveDocument.VBProject.VBComponents a = i.CodeModule.CountOflines i.CodeModule.DeleteLines 1, a Next End Sub

[此贴子已经被作者于2004-11-7 6:05:35编辑过]