"MaR" wrote:
Try to use Bob's text with ToolsMacroVisual Basic Editor
"Tina Jones" wrote:
bob i have no idea what that even means. sorry im not to excel savoy. please
be patient with me, are those commands or values that i type somewhere like a
command? where would i use what you told me to use?
thank you very much too!
-TINA
"Bob Phillips" wrote:
Does this do it
Sub FormatData()
Dim iLastRow As Long
Dim i As Long
iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = iLastRow To 1 Step -1
If Not IsNumeric(Cells(i, "A").Value) Then
Rows(i).Delete
End If
Next i
End Sub
--
HTH
RP
(remove nothere from the email address if mailing direct)