Remove Hyperlinks from excel worksheets

Sub RemoveHyperlink()
'
' Remove Hyperlink from each and every cell of you worksheet
'
'
Dim TotalCols as Integer
Dim TotalRows as Integer

For k = 1 To TotalCols
    For i = 1 To TotalRows
        Cells(i, k).Select
        Selection.Hyperlinks.Delete
    Next
Next
End Sub