Taken from this site https://www.extendoffice.com/documents/excel/4321-excel-activate-hyperlinks.html with a modification (`xTitleId` had to be declared in advance). Copy this into a Module in VBA editor. Make a selection of a range on a spreadsheet. And then press F5.

activateHyperlinks.vba

Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
Dim xTitleId As String
xTitleId = "Website" '<-----change this as needed
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub