Extracting info from hyperlink

Question

I have a column with more than 200 hyperlinks. Every link point to a sheet in the same file. Is there a way to write the sheet's name in another column to which the hyperlink points?

For example, the First link opens the sheet10, so I want to write in the column on the right "Sheet10"

Answer 1

This will offer you an example of how to list the hyperlink targets using VBA:

Sub ListLinks()
    Dim oHl As Hyperlink
    Dim oWs As Worksheet
    For Each oWs In ActiveWorkbook.Worksheets
        For Each oHl In oWs.Hyperlinks
            'Debug.Print oHl.Address
            Debug.Print oHl.SubAddress
        Next
    Next
End Sub