• Select the workbook you want to contain the macro
• ALT+F11...to open the VBA editor
• Insert.Module
• Copy the below code and paste it into that module:
Sub ConvertTxt2Hyperlink()
Dim cCell As Range
For Each cCell In selection.Cells
If cCell.Hyperlinks.Count = 0 Then
On Error Resume Next
ActiveSheet.Hyperlinks.Add _
Anchor:=cCell, _
Address:=cCell.Value, _
TextToDisplay:=cCell.Value
End If
Next cCell
End Sub
• Select the range of cells you want converted to hyperlinks
• ALT+F8...to see the list of available macros
...Select: ConvcertTxt2Hyperlinks()
...Click: Run
Assuming each cell contains the name of a worksheet,
each selected cell will now contain a hyperlink to cell A1 of the referenced sheet.
Is that something you can work with?
Bookmarks