Delete all non-numerics
Sorry, poor copy/paste/edit. The
..SpecialCells(xlCellTypeBlanks, 2).Delete
doesn't need the 2...
HTH,
Bernie
MS Excel MVP
"Bernie Deitrick" <deitbe @ consumer dot org wrote in message
...
Mrs. Robinson,
For column B:
With Range("B:B")
.SpecialCells(xlCellTypeConstants, 2).Delete
.SpecialCells(xlCellTypeBlanks, 2).Delete
End With
HTH,
Bernie
MS Excel MVP
"Mrs. Robinson" wrote in message
...
I'm in the middle of a macro to extrapolate a row of numbers and then use the
numbers as a basis to extrapolate more information. I'm trying to delete all
the blank cells and cells with text in them, leaving behind only the numbers.
Is this possible? The worksheet from which the column is pulled is
formatted as general.
Thanks,
Mrs. Robinson
|