根据安全设置,已经禁用宏,若要运行宏，您需要重新打开此工作薄，然后选择“启用宏”。这是怎么回事啊。

发布网友

我来回答

共4个回答

热心网友

根据安全设置，已经禁用宏，若要运行宏，需要重新打开此工作薄，是设置错误造成的，解决方法如下：

1、首先打开“文件”菜单下的“选项”。

2、找到左侧的“信任中心”。

3、然后在右侧找到“信任中心设置”选项。

4、接着在打开的对话框的左侧，找到“宏设置”。

5、最后在右侧找到“禁用所有宏，并且不通知”选项，选中后确定即可完成。

热心网友

注意：此方法会删除Excel文件的所有宏，如果文件内含自己编辑使用的宏，请谨慎使用。（亲测有效）


1

关闭所有打开的Excel文件，新建一个空白Excel文档

2

空白文档建好后，按ALT+11弹出VB编辑窗口

3

找到插入标签，插入模块

请点击输入图片描述

4

在弹出窗口内粘贴以下内容：（加粗部分改掉，改成要删除宏的文件名）

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

按F5，在弹出的窗口内找到想要清理的Excel文件，打开

请点击输入图片描述

6

等命令执行完毕后，点右上角X，关闭文档。

重新打开EXCEL文件，烦人的弹窗消失了。

热心网友

我也碰到同样问题，上网搜了半天没找到解决办法，自己想法解决了，但愿对你有所帮助：

左侧OFFICE徽标，Excel选项，信任中心，信任中心设置，受信任的位置，添加新位置，浏览，(文件所在文件夹)，确认，勾选“同时信任此位置的子文件夹”，确认。

关闭Excel再打开，搞定。

不过安全性降低了，注意不要随便打开来源不明的Excel文件哦

热心网友

OFFICE软件的安全设置问题