how can I delete cells containing text within a range of cells
 

EXCEL 2003

how can I delete cells containing text within a range of cells
 

Try this small macro:

Sub cleantext()
For Each r In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConst ants)
If IsNumeric(r) Then
Else
r.Clear
End If
Next
End Sub

--
Gary''s Student - gsnu200790


"jackwmbg" wrote:

EXCEL 2003

how can I delete cells containing text within a range of cells
 

F5SpecialConstants. Checkmark in "Text" and OK.

EditDelete


Gord Dibben MS Excel MVP

On Fri, 6 Jun 2008 04:49:01 -0700, jackwmbg
wrote:

EXCEL 2003