Highlight linked cell

[Brian F]

I want to highlight the cell chosen by a link.

I have a list in the first column of my worksheet (in alphabetical order so I can find them) that corresponds to the column headings (inspection types in this case). For example, if I click the link in the first column for "Foundation Inspections" the link chooses the cell at the top of the column "Foundation Inspections". There are 80 different links, corresponding to 80 different column heading, corresponding to 80 different inspection types. It is difficult to see which column the link has chosen. I want the chosen cell (the object of the link, the cell the cursor now sits on) to highlight a bright color so I can find it.

Help is always appreciate! Thank you in advance for any help you can give.

 

[Jaafar Tribak]

Maybe domething like this :

(Code in the worksheet module)

Private prev As Range

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

    ActiveCell.Interior.ColorIndex = 3
    Set prev = ActiveCell

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    On Error Resume Next
        prev.Interior.ColorIndex = xlNone
    On Error GoTo 0
   
End Sub