Enter and run this small macro:


Sub long_clearer()
Dim r As Range
For Each r In ActiveSheet.UsedRange
If Len(r.Value) 25 Then
r.Clear
End If
Next
End Sub

--
Gary's Student


" wrote:

Does any one know how to do this???
Cheers,
elaine.