Javascript vba excel internet explorer禁用警告https消息

加载网站时，我收到以下安全警告：

是否仅查看安全交付的网页内容。

这个弹出窗口导致我的代码出错，有没有办法用vba禁用它

谢谢

这是密码

    Sub Start()

Dim ie As New InternetExplorer
Dim doc As HTMLDocument


ie.Visible = True

ie.navigate ("https://mywebsite.com")
ie.FullScreen = True
Do
DoEvents
Loop Until ie.readyState = READYSTATE_COMPLETE
Set doc = ie.document



doc.getElementById("navMenu2").Click

警告的原因是您位于SSL安全（https协议）页面上，该页面正试图加载非SSL（http协议）内容

解决此问题的最佳方法是：

使用http而不是https访问您的网站-

ie.navigate（“http://mywebsite.com“”

修复网站中的安全问题（使用https访问时不要加载不安全的内容）

如果您只是为了测试目的而修复它，您可以：

转到工具->互联网选项->安全

选择“安全”选项卡->单击“自定义级别”按钮

在“杂项”部分更改“显示混合内容”以启用