Hi,

Am Sat, 14 Nov 2015 09:45:29 -0800 (PST) schrieb :

In summary, all the hyper links -- there are some 200 of them -- are in column B, the "return" hyperlink on each detail sheet is in J1

sheets "Summary" is the first sheet and the hyperlinks start in B1 or
you have to modify the code as expected:

Sub Hyp()
Dim n As Long

Application.ScreenUpdating = False
For n = 2 To Sheets.Count
With Sheets(n)
Application.Goto .Range("J1")
.Hyperlinks.Add _
anchor:=ActiveCell, _
Address:="", _
SubAddress:="'Summary'!" & Range("B" & n - 1).Address
End With
Next
Application.ScreenUpdating = True
End Sub


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional