有時(shí)打開(kāi)EXCEL時(shí)會(huì)彈出一個(gè)窗口，告知用戶(hù)該工作簿中有一個(gè)無(wú)法禁止的4.0宏，如果看到這個(gè)提示就要當(dāng)心了，有可能這個(gè)工作簿中存在宏病毒。今天，學(xué)習(xí)啦小編就教大家在Excel中進(jìn)行刪除宏病毒的處理方法。

　　Excel中進(jìn)行刪除宏病毒的處理步驟：

　　用EXCEL2007或更高版本打開(kāi)這個(gè)工作簿(2003及以下版無(wú)法禁止4.0宏)，會(huì)看到有一個(gè)類(lèi)似下圖的用戶(hù)模塊

　　先簡(jiǎn)單說(shuō)一下這個(gè)宏病毒的原理，它由兩部分組合，一部分是利用EXCEL2003版及以下版本的缺陷，即無(wú)法禁止EXCEL4.0宏，來(lái)迫使用戶(hù)“啟用宏”，然后通過(guò)ToDOLE模塊中的VBA代碼執(zhí)行病毒程序(有的在ThisWorkbook模塊中也出現(xiàn)自動(dòng)運(yùn)行的宏病毒代碼)。

　　打開(kāi)后按ALT+F11調(diào)出VBA窗口，先將里面的ToDOLE模塊刪除(不光是刪除里面的代碼，而是刪除這個(gè)模塊)，然后雙擊ThisWorkbook模塊，看里面有沒(méi)有代碼，如果有也刪除(這個(gè)里面只能刪除代碼，而不能刪除模塊)。

　　這樣基本上VBA部分(主要的病毒部分)就清除了，保存這個(gè)工作簿，再繼續(xù)下面工作。

　　剩下要清除4.0宏了，這個(gè)宏是通過(guò)“宏表”來(lái)起作用的。

　　但病毒的作者都會(huì)將這個(gè)宏表隱藏起來(lái)，用通常的“格式-工作表-取消隱藏”的方法無(wú)效，不能顯示它，只能通過(guò)一段VBA代碼解除它的隱藏狀態(tài)。

　　另外病毒在該工作簿中的每一個(gè)工作表中都會(huì)定義一個(gè)"Auto_Activate"名稱(chēng)，這個(gè)名稱(chēng)也是隱藏的，無(wú)法通過(guò)“插入-名稱(chēng)-定義”或者“名稱(chēng)管理器”來(lái)查看，也需要通過(guò)一段VBA代碼來(lái)刪除。

　　下面通過(guò)一段VBA代碼，可以刪除宏表以及"Auto_Activate"名稱(chēng)。

　　Subabc()

　　'運(yùn)行前先打開(kāi)這個(gè)有“禁用宏就關(guān)閉”的工作簿

　　t=InputBox("輸入工作簿名稱(chēng)*.xls")

　　Seta=Workbooks(t)

　　a.Activate

　　'顯示宏工作表

　　s=0

　　ForEachshInExcel4MacroSheets

　　sh.Visible=1'顯示宏表

　　sh.Delete'刪除

　　s=s+1

　　Next

　　MsgBox"刪除了"&s&"個(gè)宏表"

　　'刪除各表中的自動(dòng)運(yùn)行“名稱(chēng)”

　　OnErrorResumeNext

　　Fori=1ToSheets.Count

　　Sheets(i).Names("Auto_Activate").Delete

　　Next

　　MsgBox"完畢,請(qǐng)保存這個(gè)工作簿"

　　EndSub

　　這個(gè)代碼應(yīng)該放到一個(gè)新建的空白工作簿中

　　假設(shè)有宏病毒的工作簿為“工作簿1”，我們?cè)诮⒁粋€(gè)空白的工作簿，假設(shè)為“工作簿2”。

　　打開(kāi)這個(gè)工作簿2的VBA窗口(ALT+F11)，給它插入一個(gè)用戶(hù)模塊。

　　把上面代碼粘貼到這個(gè)用戶(hù)模塊中，按F5執(zhí)行代碼，會(huì)提示輸入那個(gè)有宏表的工作簿1的名字，輸入后按確定，會(huì)自動(dòng)刪除宏表及"Auto_Activate"名稱(chēng)。

　　最后保存工作簿1，退出EXCEL。

　　提示：那個(gè)用來(lái)刪除宏表的工作簿2可以不保存，直接退出。

　　重新打開(kāi)原來(lái)那個(gè)有提示的工作簿1看看，是否提示已經(jīng)沒(méi)了。