搜集网上资料整合,非原创,原因是被宏病毒搞的很头痛,辛苦做出来的内容又不能删除,但是又不知道如何清除病毒,最终找到解决方法如下:
这是因为 有些工作表和名称已经被隐藏了。
首先,使用Alt+F11,在工程窗口选择“Thisworkbook”,输入如下宏命令,然后在运行-运行子过程/用户窗体,将二者显示出来
Sub test()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
sh.Visible = xlSheetVisible
Next
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Visible = True
Next
End Sub
第二,回到Excel工作簿然后将多余的Marco的sheet删除。
第三,按 ctrl+F3 显示名称管理器,将其中的所有名称删除。 搞定!!!