internet-explorer - 如何在 Internet Explorer 中打开 pdf 超链接并转到 Excel vba 中的特定页面？

Question

我想在 Internet Explorer 中打开 pdf 超链接，然后使用 excel VBA 转到特定页面。

有人知道该怎么做吗？任何帮助表示赞赏。

Answer 1

上面的第一条评论对于链接到特定页面很有用。以下是使用 VBA 打开这些链接的两种方法。

您可以使用 FollowHyperlink 方法来模拟单击链接。该链接在默认浏览器中打开，用户将收到安全提示。

Sub OpenPDF_to_page_2_Method_1()
  Const PDF_PATH = "http://www.adobe.com/support/products/enterprise/knowledgecenter/media/c4611_sample_explain.pdf"
  ThisWorkbook.FollowHyperlink PDF_PATH & "#page=2"
End Sub

或者，您可以创建一个新的 Internet Explorer 对象并导航到 PDF。无论默认浏览器如何，这都会使用 Internet Explorer，并且在打开链接之前不会给用户一个安全提示。

Sub OpenPDF_to_page_2_Method_2()
  Const PDF_PATH = "http://www.adobe.com/support/products/enterprise/knowledgecenter/media/c4611_sample_explain.pdf"

  Dim IE As Object 
  Set IE = CreateObject("InternetExplorer.Application")
  IE.Visible = True
  IE.Navigate (PDF_PATH & "#page=2")
  Set IE = Nothing
End Sub