将嵌入式WebBrowser另存为图片 - Excel VBA

时间:2016-02-19 21:56:24

标签: excel vba excel-vba google-maps

我觉得我已经尽职尽责地解决了这个问题。所以我来找你。

我有一个带有嵌入式Microsoft Web浏览器的excel文件。该文件是一个"重心"计算器。它正在获取地址列表,通过谷歌对它们进行地理编码,然后保存到html文件。然后,webbrowser使用谷歌地图上的标记和图标重新导入文件以获得重心。该工具的这方面效果很好。

现在,我希望将此地图导出到PowerPoint。我已经编写了代码来执行此操作,但我无法将图片转移出webbrowser。

下面只能复制形状本身,在这上面粘贴会在excel中创建另一个webBrowser。对powerpoint的粘贴什么都不做。

Thisworkbook.Activesheet.Shapes("Webbrowser1").Copy

下面根本没有用,它一直告诉我"期待="也许这甚至不是VBA ..

webbrowser1.document.execcommand( copy false null)

我尝试将我的webbrowser后面的单元格范围设置为等于变量,然后复制该变量,但没有成功。

打开/关闭设计模式可以让您选择浏览器对象。我试过关闭设计模式,选择图片,复制> copyaspicture,但这也没有用。

我没有真正拥有大量代码可以在这里工作,因为这个问题非常具体,而且我基本上只能用它来编写。

我可以使用更多开箱即用的解决方案,例如将活动窗口左/顶部和图片上/左边并进行某种部分屏幕抓取。我实际上也试过这个但是没有成功(可能是因为我)。

如果有人有想法,我会非常感激。我的星期五在这个星期五花了5个小时......

由于

1 个答案:

答案 0 :(得分:0)

截图的想法怎么样?

How to take screenshot of webpage using VBA?

这适用于您的应用程序。

然后必须是visible = true和displayalerts = true