Bonsoir Hurricane,
Tu sélectionnes la plage à épurer, puis tu lances la macro VBA suivante :
Sub EpurerDonnees()
Dim C As Range
For Each C In Selection
If Not C.HasFormula Then
If Not C.Hyperlinks.Count > 0 Then
C.ClearContents
End If
End If
Next
End Sub
Cordialement.
Didier