Clear only cells containing formulas

Question

I need a VBA code that clears only cells containing formulas and skip cells containing values in a given Excel Worksheet. I have the following Code:

Dim rng As Range, cl As Range
Set rng = ThisWorkbook.Sheets("MATRIX").Range("C2:AU10000")
    For Each cl In rng
        If cl.Hyperlinks = .Hyperlinks Then
            cl.ClearContents
        End If
    Next cl

Answer 1

Try this approach, please:

If cl.HasFormula Then
       cl.ClearContents
End If

Answer 2

This should be the quickest way

rng.SpecialCells(xlCellTypeFormulas).ClearContents