处理宏病毒代码

Sub DisplayNames()

Dim Na As Name

For Each Na In https://www.360docs.net/doc/a56914838.html,s

Na.Visible = True

Next

End Sub



1、首先打开Excel2010，就会出现“找不到macro1!$A$2”问题

这是因为隐含在隐藏的名称中没有删除干净




2、在Excel界面上按Alt+F11，进入VBE窗口，在左边“工程”窗口中点选出问题的那个工作簿，然后插入一个模块




3、将如下代码复制到模块中：

Sub DisplayNames()

Dim Na As Name

For Each Na In https://www.360docs.net/doc/a56914838.html,s

Na.Visible = True

Next

End Sub

然后点“运行”按钮运行宏代码




4、回到EXCEL界面，选择“公式”——“名称管理器”




5、在跳出的窗口中就能看到隐藏的名称，把他删除就可以了。