使用 InternetExplorer 对象打开链接
示例代码:
Dim ie As InternetExplorer
Set ie = New InternetExplorer
ie.Visible = True
ie.Navigate "https://docs.google.com/forms/d//viewform"
Do While ie.Busy Or ie.ReadyState <> READYSTATE_COMPLETE
DoEvents
Loop
Set ie = Nothing
请注意,需要在代码开头添加对 Microsoft Internet Controls 的引用。
这个解决方法会打开默认浏览器并加载指定链接。在上面的示例代码中,将“