自动打开excel里的超链接

来源:百度知道 编辑:UC知道 时间:2024/05/25 01:08:17
需要一次打开A列所有的超链接(全是超链接),看了下这个 搞不定,http://zhidao.baidu.com/question/93512886.html
还请高手指点。
@zzhulove:错误提示:subscript out of range
另外,能否把里面的参数表示的意思说明一下,方便以后改

Sub Macro2()
Dim i, j As Integer
If Cells(1, 2).Value = "" Or Cells(1, 3).Value = "" Then Exit Sub
For i = Cells(1, 2).Value To Cells(1, 3).Value
Cells(i, 1).Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
Windows("连接问题.xls").Activate
Next
End Sub

你的超连接在A列

在B1输入 起始行 如2

在C1输入结束行 如200

按ALT+F11

双击左侧 超连接所在工作表 如SHEET1

把这段代贴进去,点执行