Workbook.FollowHyperlink 打开一个确定/取消对话框窗口

Question

我正在使用 Workbook.FollowHyperlink 方法下载/打开一个 excel 文件。

问题是我想自动化该过程，但该方法会打开一个对话框 ok/cancel，告诉我这个文件可能会损害我的计算机，如果我真的想打开它。

代码

Dim strURL As String
strURL = "https://app1.intra.corp/A997/EnCours/Configs?Download=Exporter"
ThisWorkbook.FollowHyperlink (strURL)

我搜索并尝试了很多方法，但没有成功。

我试过了：

1. 添加注册表项以禁用 Office 的超链接警告。

2. 进入 excel 选项、隐私设置和禁用受托网站保护或任何所谓的。

3. 使用 Application.SendKeys 并尝试发送“enter”来回答对话框。

4. Application.EnableEvents = False 和 Application.DisplayAlerts = False。 （它适用于除此之外的所有其他对话框）

5. 在 Internet Explorer 选项中将网站添加到我的受信任网站列表（注意：我无法执行此操作，因为这些设置已被我的公司锁定）

Answer 1

你试过了吗

Workbooks.Open("https://app1.intra.corp/A997/EnCours/Configs‌​?Download=Exporter")

相反？应该可以的。