使用Excel VBA将Googlesearch转换为PDF
我试图编写VBA代码来自动执行针对特定主题运行Googlesearch的过程,并将结果的前两页保存为PDF。
我是新来的编码,所以任何帮助将大规模赞赏。 我认为我需要遵循的步骤是:
- 设置一个循环遍历search项目列表(可能列在Excel中的列A下)
- 对于列表中的每个项目:
- 打开Internet Explorer(在后台打开屏幕)
- 在Google中search该项目
- 等待页面完全加载
- 将结果的第一页导出为PDF(到硬编码位置)
- 移至Google结果的第二页
- 等待页面完全加载
- 将结果的第二页导出为PDF
- 退出Internet Explorer应用程序
- 移到列表中的下一个项目并重复上述操作
我已经创build了使用以下方式打开Internet Explorer的模块,但是我正在努力处理循环并导出到PDF组件:
Set IE = CreateObject("InternetExplorer.Application") IE.Navigate "http://www.google.com.au/search?hl=en&q=testing&meta=" IE.Visible = False Do Until IE.ReadyState = READYSTATE_COMPLETE
在出口到PDF格式,我已经得到了PDFCreator软件,这是我需要用于PDF导出。
关于上述是否可能的任何想法? 非常感谢。