1、打开Excle,快捷键Alt+F11,然后插入模块

2、输入一下内容到编辑器
Sub 打开网页()
For Each A In Selection
With CreateObject("InternetExplorer.Application")
.Visible = True
.navigate A.Value
End With
Next
End Sub

3、返回的excle界面,选中要打开的单元格

4、快捷键Alt+F8,然后点击运行,网页将从上到下依次被打开。

5、谢谢观看
时间:2026-02-15 19:43:04
1、打开Excle,快捷键Alt+F11,然后插入模块

2、输入一下内容到编辑器
Sub 打开网页()
For Each A In Selection
With CreateObject("InternetExplorer.Application")
.Visible = True
.navigate A.Value
End With
Next
End Sub

3、返回的excle界面,选中要打开的单元格

4、快捷键Alt+F8,然后点击运行,网页将从上到下依次被打开。

5、谢谢观看