EXCEL 同一个表格文件中的不同sheet(工作簿)单元格的批量超链接

大家好,请教大家一个问题。
想要把一个表格文件中的sheet1中的单元格A1-A100,超链接到sheet2中的单元格B1-B100。达到的效果是:点击sheet1中的A1-A100单元格,依次自动跳转到sheet2中的B1-B100单元格。一个一个超链接太麻烦了,请问大家有什么好方法吗?谢谢。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
Select Case Target.Row
Case 1 To 100
Sheet2.Activate
Sheet2.Cells(Target.Row, 2).Select
End Select
End If
End Sub

'这段代码放到sheet1下就可以了,如图,测试无误

追问

十分感谢。
如果我想点击sheet1中的B13-B23,依次跳转到sheet2中的D20-D30,这样应该怎么写这段VBA呢?谢谢您了。

追答

第二行的数字1改成2
第四行的1 to 100改成13 to 23
第六行row和逗号之间加上+7
第六行的数字2改成4
手边没电脑你自己试

采纳能不能来一波

温馨提示:答案为网友推荐,仅供参考