excel服务器-Excel---如何快速打开Excel中的多个链接/网址

作者：汪汪家的宝贝

链接：https://www.jianshu.com/p/90767834fd21

前言

在日常工作中，我们或许会遇到一个Excel工作表中有几千行链接/网址，需要我们手动打开去查看其中的内容（经过机器筛选无法判断的情况下），此时这种情况怎么办？

如果将每一条复制下来，然后粘贴到浏览器打开，也不是不可以。我粗略估计了一下如果有2000条数据的话，采用这样的方法，需要2个人工作1整天，才能勉强做完。

接下来为大家分享的方法，虽然不能做到完全自动，但是亲测效率可以提高40%以上。

---

第一步：插入模块

打开Excel，按住快捷键Alt+F11（有的可能需要按住Fn+ Alt+F11）,然后点击“插入”---选择“模块”。此时会弹出来一个编辑器。

第二步：输入代码。

输入以下内容到编辑器，然后关闭编辑器。

Sub 打开网页()

For Each A In Selection

With CreateObject("InternetExplorer.Application")

.Visible = True

.navigate A.Value

End With

Next

End Sub

写入代码.png

第三步：返回Excel界面，选中要打开的单元格。

选中要打开的单元格.png

第四步：运行模块，打开链接

按住快捷键Alt+F8（有的可能是Fn+ Alt+F8），然后点击“执行”，网页将从上到下依次被打开。如此所有需要的网页会被打开，方便我们一起查看。

执行模块.png

---

结语

看了这个过程，小伙伴们是不是觉得非常简单呢？

其实效率就是在这样点点滴滴的技巧改进中不断提升起来的。我会继续将我自己对数据分析方面总结和学习到的经验分享出来，期待一起进步。加油~