wps2019启用宏+excel批量打开网址

很多跑业务的人肯定都会有这样的需求，一个excel，密密麻麻几千行，都是网址，还不带超链接，一个一个点开看效率非常低下，怎样能批量打开这些网址呢？
首先，打开文档，我这里使用的wps2019，免费哦
打开开发工具，想要使用宏，但是发现用不了，免费版果然有坑，所有的按钮都是灰色的，但是不怕，我们需要下载VBA FOR WPS 7.0.1590，安装，重启

可以看到，我们已经可以使用宏功能了

新建一个宏

插入以下代码

For Each A In Selection
With CreateObject("InternetExplorer.Application")
.Visible = True
.navigate A.Value
End With
Next

然后我们选中需要打开的行，点击宏，运行刚才创建的宏

成功打开对应页面