Amend code

Looking to see if range contains a entry then clear the area called Clear

Any ideas greatfully received
Sub Macro7()

If Range("Clear_Area").Value <> "-" Then
Range("Clear").ClearContents
End If
End Sub

VBA noob