VBA 怎样批量下载网页图片？

dongdonggege · 发表于 2024-8-12 20:21

tspliu 发表于 2024-8-12 19:43
那你不是不会下载图片，是不会基础的网爬和字符串处理。。。。我也不太帮得了你，我只会修修改改，红 ...

老师，请问你有这样的两个网址，小学语文和小学数学2022年课程标准，
小学语文https://www.pep.com.cn/ebook/2022yjkcbz/yw/mobile/index.html
小学数学https://www.pep.com.cn/ebook/2022yjkcbz/sx/mobile/index.html
请问如何下载？

dongdonggege · 发表于 2024-8-12 20:26

lss001 发表于 2024-8-12 14:23
Sub WebImageGrabber()
Dim xml As Object, html As Object
On Error Resume Next

老师你好，能运行，保存在哪个文件夹，我怎么找不到？

dongdonggege · 发表于 2024-8-12 20:33

MR_PP 发表于 2024-8-12 10:30

老师你好，运行半天没反应。我想下载小学语文课程标准https://www.pep.com.cn/ebook/2022yjkcbz/yw/mobile/index.html
小学数学课程标准https://www.pep.com.cn/ebook/2022yjkcbz/sx/mobile/index.html，怎么下载？

lss001 · 发表于 2024-8-12 20:45

本帖最后由 lss001 于 2024-8-12 20:47 编辑

dongdonggege 发表于 2024-8-12 20:26
老师你好，能运行，保存在哪个文件夹，我怎么找不到？

代码放在word中运行，图片将添加到Word文档页面中

dongdonggege · 发表于 2024-8-13 00:13

lss001 发表于 2024-8-12 20:45
代码放在word中运行，图片将添加到Word文档页面中

老师，半夜打扰你，不好意思。明天帮我看下，之前的那个连环画的页面能运行，下载了很多的图片。
但是后来给你的小学语文，小学数学课程标准网址，不能下载，那个网址不能查看网页源代码，或者页面没有保存图片，或者图片不是jpg格式的，或者网页右键只有打印，放大，全屏，缩略图功能。
一个图片，或者pdf，都没下载出来，这个怎么办？

dongdonggege · 发表于 2024-8-13 00:15

lss001 发表于 2024-8-12 20:45
代码放在word中运行，图片将添加到Word文档页面中

保存只能是WEBP图像文件格式，不是jpg的。

zxsea_7426 · 发表于 2024-8-13 08:23

本帖最后由 zxsea_7426 于 2024-8-13 08:24 编辑

dongdonggege 发表于 2024-8-12 20:33
老师你好，运行半天没反应。我想下载小学语文课程标准https://www.pep.com.cn/ebook/2022yjkcbz/yw/mobil ...

这个页面直接有下载的真正地址

Yalishanda30 · 发表于 2024-8-13 08:33

dongdonggege 发表于 2024-8-12 20:21
老师，请问你有这样的两个网址，小学语文和小学数学2022年课程标准，
小学语文https://www.pep.com.cn/e ...

这个比较简单

smiletwo · 发表于 2024-8-13 08:43

dongdonggege 发表于 2024-8-11 19:06
这是图片的网址，我要的是保存这个图片，怎么写？谢谢

再添加个下载网页图片的函数，整个循环下载。

Yalishanda30 · 发表于 2024-8-13 09:20

dongdonggege 发表于 2024-8-13 00:13
老师，半夜打扰你，不好意思。明天帮我看下，之前的那个连环画的页面能运行，下载了很多的图片。
但是后 ...

pdf也可以的

		自动登录	找回密码
密码			免费注册

[求助] VBA 怎样批量下载网页图片？