如我有6张表,sheet1是目录,sheet2到sheet6的名称是sheet1第一列的单元格内容。
我怎么让sheet2到sheet6与sheet1对应的单元格内容建立起超级链接?
简言之,如下所示的宏,需要一个循环公式,我不会,麻烦各位大侠赐教!
Sub Macro6()
'
' Macro6 Macro
'
'
Range("A2").Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'Q-0005638139.001000'!A1", TextToDisplay:="Q-0005638139.001000"
Range("A3").Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'Q-0005638135.001000'!A1", TextToDisplay:="Q-0005638135.001000"
End Sub
不要复制粘贴,百度知道我也会搜。谢谢!