去掉EXCEL【根據安全設置,已禁用宏。……】?

Tags: 文件, 宏病毒,

EXCEL文件中了宏病毒之後,我們需要下載宏病毒專殺工具,但殺完病毒後。打開文件,總會彈出煩人的窗口:“根據安全設置,已禁用宏。若要運行宏,您需要重新打開工作簿,然後選擇啟用’宏‘。

下面就讓我們簡單幾步解決這個煩人的彈出窗口。

工具/原料

EXCEL

宏病毒專殺工具

寫在前面

如果我們有Excel宏病毒,可以下載Excel宏病毒專殺工具,先行殺滅宏病毒。

下載鏈接: 密碼:c53o

此時打開殺完宏病毒的Excel文件,會彈出下面的窗口

去掉EXCEL【根據安全設置,已禁用宏。……】

去除煩人彈窗步驟正式開始!

關閉所有打開的Excel文件,新建一個空白Excel文檔

空白文檔建好後,按ALT+11彈出VB編輯窗口

在左側工作簿1下右鍵,插入模塊

去掉EXCEL【根據安全設置,已禁用宏。……】

在彈出窗口內粘貼以下內容:

Sub RmvMacros()

Dim wbk As Workbook

Dim strFilename As String

strFilename = Application.GetOpenFilename("Excel 文件 (*.xls;*.xlsx),*.xls;*.xlsx") '要刪除宏的文件名

If strFilename = "False" Then Exit Sub

Application.EnableEvents = False '禁止在打開時觸發事件

Application.DisplayAlerts = False

Set wbk = Workbooks.Open(strFilename)

For Each sht In wbk.Sheets

sht.Visible = True

If sht.Type = 3 Or sht.Type = 4 Then sht.Delete

Next

For i = wbk.Names.Count To 1 Step -1

If wbk.Names(i).Visible = False Then wbk.Names(i).Delete

Next i

wbk.Close savechanges:=True

Application.DisplayAlerts = True

Application.EnableEvents = True

End Sub

去掉EXCEL【根據安全設置,已禁用宏。……】

按F5,在彈出的窗口內找到想要清理的Excel文件,打開

去掉EXCEL【根據安全設置,已禁用宏。……】

等命令執行完畢後,點右上角X,關閉文檔。

重新打開彈窗文件,煩人的彈窗終於消失了。

整個世界清靜了~~

相關問題答案