Hyper link to multiple tabs

[bgonen]

I'm trying to create links to multiple tabs starting at cell F110 on the tab:SUMMARY
I get stuck at the blue command

Sub IDX()
Dim ws As Worksheet, i As Integer
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "SUMMARY" Then
i = i + 110
Sheets("SUMMAR").Range("F" & i).Value = ws.Name
Sheets("SUMMARY").Hyperlinks.Add Anchor:=Range("F" & i), Address:="", SubAddress:="'" & ws.Name & "'!F110", TextToDisplay:=ws.Name
End If
Next ws
Sheets("SUMMARY").Columns("F").AutoFit
End Sub

 

[VoG]

I think you just have a typo

Sheets("SUMMARY").Range("F" & i).Value = ws.Name

 

[bgonen]

Thanks Peter
Most of the code I got from one of your previous replies,,, I can't even "Steal" right,,,,,shame on me,,

For some reason, the code only pull one Tab (I have approx 9 more tabs)

 

[VoG]

That should work. Have you tried scrolling down a long way (you are adding 110 rows between each entry).

 

[bgonen]

I changed the spaces ,,, finally I understand ,,,i+1
Right now the list of sheets starts at F1 and I try to start from a different place (F10 for example),,can you help me?