Question

如何批量打开EXCEL中多个单元格中的链接在浏览器中显示。

http://zhidao.baidu.com/question/340249626.html 这里虽然有个答案，但是那个按钮如何制作没有说出来，有人知道怎么做吗 ，请教下了。

Answer 1

给出你核心的代码语句，其他自己改，

其实就是循环单元格，然后打开其中的链接，

代码中的Selection是当前选中的区域，可以根据实际需要修改~

第一种是打开指定选区内的所有超级链接

第二种是打开整个工作表内所有的超级链接

根据需要修改就行，

Sub OpenHyperlinks1()
    On Error Resume Next '如果单元格中没有超级链接会报错，此句代码防错处理
    
    For Each Rng In Selection '循环选区中的各个单元格
        Rng.Hyperlinks(1).Follow '打开单元格中的超级链接
    Next
End Sub


Sub OpenHyperlinks2()
    On Error Resume Next '如果单元格中没有超级链接会报错，此句代码防错处理
    
    For Each objLink In Worksheets(1).Hyperlinks '循环第一个sheet中的所有超级链接
        objLink.Follow '打开单元格中的超级链接
    Next
End Sub

Answer 2

这个是已经做好超链接的基本上，你选中这些带有超链接的单员格，然后单击右键，选择“打开选中的单员格”这样就可以了。超链接的添加你可以自己找一下百度，很容易的，如果有发要，你可以去51自学网去学习一下EXCEL的课程，很容易的呢