Hyperlink

[pragnesh_50]

Hi,


I have cell Addresses of 800 cells of sheet2 in column B of sheet1.


I want to create hyperlink at a time for all such 800 items in column B of sheet1.


So that when i click on any cell in column B of sheet1....i will switch over to cell in sheet2.


Any Help?


Regards,

Pragnesh

 

[Luke M]

Here's a quick macro for you. Just need to change the sheet name as needed. Then, select the 800 cells on sheet 1 and run the macro.

[pre]

Sub CreateLinks()
Dim xAddress As String
Dim xSheet As String

'Which sheet are you linking to?
xSheet = "Sheet2"

For Each c In Selection
ActiveSheet.Hyperlinks.Add Anchor:=c, Address:="", SubAddress:= _
xSheet & "!" & c.Value, TextToDisplay:=c.Value
Next c

End Sub

[/pre]
Note that there are no error checks, so I'm assuming the cell addresses are correct.

 

[pragnesh_50]

Hi Luck M,


I have sheet i.e.,SUMMERISED FEEDBACK having cell address.


and second sheet i.e.,FEEDBACK


I want to create link in "SUMERISED FEEDBACK"


Could you give me vba code accordingly.....


presently i got error as variable are not defined.


Regards,

Pragnesh

 

[pragnesh_50]

Hi Luck M,


Thanks a lot .....ignore my above note....


Now i am able to create link .....


Regards,

Pragnesh