Question

怎么关闭每次打开Excel时都显示microsoftExcel

Answer 1

Win开始——运行，输入Regedit，打开注册表编辑器，找到如下路径：
HKCU\Software\Microsoft\VBA\Security，找到LoadControlsInForms项（如果没有，新建一个），将其值修改REG_DWORD类型的1
HKCU\Software\Microsoft\Office\Common，找到Security\UFIControls项（如果没有，新建一个），将其值修改为REG_DWORD类型的1
如果不会操作注册表，新建一个EXCEL文件，按【ALT+F11】，主菜单“插入”——模块，将下述代码粘贴到右侧编辑区，然后执行主菜单“运行”——过程，然后退出EXCEL（不用保存新建文件），再打开EXCEL就解决了控件初始化不安全的提示

Sub ControlAx()
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
WshShell.RegWrite "HKCU\Software\Microsoft\VBA\Security\LoadControlsInForms", 1, "REG_DWORD"
WshShell.RegWrite "HKCU\Software\Microsoft\Office\Common\Security\UFIControls", 1, "REG_DWORD"
Set WshShell = Nothing
End Sub