Links and cells

[nitind]

I have 4 (a,b,c,d) sheets .Out of these 4 sheets ,3 sheets (a,b,c) have a number of links to the 4th worksheet (i.e. d).Now I want that when I go from "sheet a" to "sheet d" , i should be able to get the cell no of "sheet a" in which the user clicked to activate "sheet d" .

 

[RolfJ]

Include this code in the ThisWorkbook VBA module of your workbook:

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
    Set hyperlinkCell = Target.Range
    MsgBox ("Hyperlink clicked on worksheet " & Sh.Name & " in cell " & hyperlinkCell.Address)
End Sub

and declare the global variable hyperlinkCell in a standard VBA module for use in other routines:

Public hyperlinkCell As Range

That should do the trick,
Rolf