源代码 如何通过网页源代码来提取网页中的图片?

如何通过网页源代码来提取网页中的图片?Dim URL As StringDim MySheet As ObjectDim MyBrowser As ObjectSet MyBrowser=UserFo

如何通过网页源代码来提取网页中的图片?

Dim URL As String

Dim MySheet As Object

Dim MyBrowser As ObjectSet MyBrowser=UserForm1.WebBrowser1

设置MySheet=此工作簿。工作表(“测试”)

MySheet.Cells.NumberFormat格式=“@”

。导航URL

Do Until.ReadyState=4

DoEvents

Loop

End With

设置MyBrowser=Nothing End Sub