“安全警告,宏被禁用”是怎么回事?

“安全警告,宏被禁用”是怎么回事?,第1张

“安全警告,宏被禁用”这是微软为了防止宏病毒的一种有效措施,用户可以手动取消这个提示,解决方法如下:

1、打开Word,点击左上角的【文件】,然后点击侧边栏的【选项】;

2、在【Word选项】对话框中,点击侧边栏的【信任中心】,然后再选择里面的【信任中心设置】;

3、在【信任中心】对话框中,点击侧边栏的【宏设置】;

4、在右侧格局根据用户自己的需要选择第一项或者第四项,然后点击下方的【确定】并退出;

5、最后,重新打开Word软件,就可以发现安全警告的提示已经不在了。

这是软件设置的问题,重新设置一下即可。

具体的 *** 作方法和步骤如下:

1、首先,在“文件”菜单下打开“选项”,如下图所示

2、其次,在左侧找到并点击“信任中心”选项,如下图所示。

3、接着,在右侧找到并点击“信任中心设置”按钮,如下图所示。

4、然后,在打开的对话框的左侧,找到并点击“宏设置”选项,如下图所示。

5、最后,在右侧找到选项“禁用所有宏,并且不通知”, 选择后并保存,即可完成,如下图所示。这样,问题就解决了。

网上找了很久,终于找到有效的办法,亲测有效,不过此方法会删除Excel文件的所有宏,如果文件内含自己编辑使用的宏,请谨慎使用。

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

2空白文档建好后,按ALT+11d出VB编辑窗口

3找到插入标签,插入模块

请点击输入图片描述

请点击输入图片描述

4在d出窗口内粘贴以下内容:(粘贴内容为从Sub RmvMacros到End Sub)(加粗部分改成一直跳提示的那个文件名)

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,在d出的窗口内找到想要清理的Excel文件,打开

请点击输入图片描述

6

等命令执行完毕后,关闭所有文档,重新打开一直跳提示的那个EXCEL文件,烦人的d窗消失了。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/6891289.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-03-29
下一篇 2023-03-29

发表评论

登录后才能评论

评论列表(0条)

保存