Clear Cells with #'s Plz hlp

[omegadeltaphi]

I have 4 columns A,B,C,D
thousands of rows

Column B: has some data that is #'s only (not important)
........................so i need to empty those cells with #'s only in
that column

any macros?

thanks in advance

Steve G

 

[CWatts]

Here you go. You can edit the range A1:D1000 to the scope of the range all your numbers are in, or you can change Range("A1:D5000") to Selection and then highlight whatever you want to remove numbers and run the macro.

Sub NumberRemove()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

For Each c In Range("A1:D5000")
    If WorksheetFunction.IsNumber(c.Value) Then c.ClearContents
Next

Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

 

[villy]

Sub num()
Application.ScreenUpdating = False
For Each b In Range("B:B")
    With WorksheetFunction
        If .IsNumber(b) Then b.ClearContents
    End With
Next
Application.ScreenUpdating = True
End Sub

 

[omegadeltaphi]

thank uuuuuuuuuuuuuuuuuuuuuuuuuu!!!!!!!!!!!!!!!!!!!!
bro


that worked fantastically........is that a word?


steve g

 

[omegadeltaphi]

thanks to both of u for helping but for some reason Cwatts
yours worked and


Villy when i tried your it didnt

but like i said thanks to both of you

Steve G