Quote Originally Posted by Help321 View Post
Hi

Try this:

vb Code:
  1. Dim i As Integer
  2.    
  3.     i = 4
  4.     For i = 4 To 10
  5.         Range("A" & i).Select
  6.         ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:="Sheet1!" & Range("A" & i).Text, TextToDisplay:=Range("A" & i).Text
  7.     Next i

That will start at cell A4, as you've already done A3 and finish at A10. Amend it as required for your real spreadsheet.

Cheers
Thanks a lot :-) This is what i really need. I tried to use the same concept but the one thing i couldn't do is how to implement it in ActiveSheet.Hyperlinks.Add method. I kind of confused what to put in "SubAddress" as i am getting an invalid link in my previous code.

Thank you so much again for the help :-)