首页 > Excel专区 > Excel技巧 >

如何利用Excel下载网页精美图片?

Excel技巧 2023-01-08

之前工作需要把销售业绩上的商品添加对应图片,而商品图片都在网站上,这里就需要把商品图片下载到本地,在进行Excel图片填充,下面介绍如何利用VBA技术下载网页图片保存在本地文件夹。

获取图片链接

这里小编将需要下载图片的网址放置于Excel工作表中,如下图所示:

如何利用Excel下载网页精美图片?

输入代码

点击开发工具,打开Visual Basic,插入一个模块,输入以下代码:

如何利用Excel下载网页精美图片?

头三行代码是对URLDownloadToFile的申明(如果无这句,底下代码无法运行,报错“用户定义类型未定义”),可输入在一行,这里用“ _”对代码进行换行,便于截图展示。URLDownloadToFile解释:从指定URL地址读取内容并将读取到的内容保存到特定的文件里,调用格式为:Call URLDownloadToFile(0, "网页地址", "保存到本地文件名和地址", 0, 0)。

这里需要注意的是:代码中的申明是针对64位系统的电脑,如果是32位系统得换成以下语句:Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA"(ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

运行代码

点击F5或者菜单栏中的运行按钮,即可运行代码,如果图片较多的话,程序需要一定的时间,小伙伴们记得耐心等候下,程序运行完毕,可以发现图片已经被下载在特定的文件夹中。

如何利用Excel下载网页精美图片?

也许会有小伙伴吐槽,网址需要一个个收集,略微麻烦,这里解释下,小编之前遇到的是一类商品网址头部一致,只有尾部数字代号不一样,可以利用Excel连接技术(“&”),批量获取商品网址,在进行图片下载,这里仅将下载代码分享给大家,供参考。


Copyright © 2016-2023 office学习教程网 office.tqzw.net.cn. All Rights Reserved.