1、首先，需要打开一个带有超链接的表格
2、进行Ctrl+C复制，然后Ctrl+V粘贴在sheet2中的B列
3、然后在表格的尾部，右击，点击查看代码。
4、会出现一个空白的页面，这时需要把Sub OpenHprLnks()Dim i As IntegerOn Error Resum髫潋啜缅e NextFor i = 1 To 10Cells(i, 2).Hyperlinks(1).Follow NewWindow:=TrueNextEnd Sub这个代码输进去就行。
5、然后点击F5运行。
6、数亨蚂擤缚字是可以设置的，如果有1000条链接，可以输入950——1000，但是不建议一下子打开这麽多页面，可以10页，10页的打开。
7、打开这么多页面不好关闭怎么办。这时候在导肾禀嚼隳航栏任何一个你想关闭的地方，点一下，即可关闭右面的链接，也可关闭左边的所有链接。
