@Adrie0181 You can use a macro like this one. Make sure you run this against a copy of your file as this macro cannot be undone.
Option Explicit
Sub ReplaceHyperlinks()
Dim aCell As Range
For Each aCell In ActiveSheet.UsedRange
If aCell.Hyperlinks.Count > 0 Then
aCell.Value = aCell.Hyperlinks(1).Address
aCell.Hyperlinks.Delete
End If
Next
End Sub