Question

该代码的目的是将许多PDF转换为图像，以便我可以将其多页粘贴到Word文档中。据我所知，由于我无权使用Adobe Pro，因此我将不得不使用第三方应用程序。是否可以使用VBA访问众多PDF图片网站之一，上传PDF文件并下载它们，而无需用户干预？

我已在第一部分中使用下面的代码，单击“上传”按钮，但出现错误。即使此错误已解决，我也可以在无需用户干预的情况下访问表单并插入文件路径？

如果有人知道一种将PDF转换为图像的更简单，更自动化的方法，请告诉我。

非常感谢！

Sub GoToWebsiteTest()

Dim appIE As InternetExplorerMedium
'Set appIE = Nothing
Dim button As Object

Set appIE = New InternetExplorerMedium

sURL = "https://pdf2jpg.net/"
With appIE
    .navigate sURL
    .Visible = False
End With

Do While appIE.READYSTATE = 4: WScript.Sleep 100: Loop

Set button = appIE.document.getElementById("advanced_pdf_file") 'I get a runtime error here
button.Click

End Sub

将PDF转换为图像

0 个答案: