Given your example
Sub leavenumberandA()
mc = 1
For i = Cells(Rows.Count, mc).End(xlUp).Row To 2 Step -1
x = Cells(i, mc)
If Len(x) 1 And Right(x, 1) < "a" Then Rows(i).Delete
Next i
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"T2net" wrote in message
...
On 22 fév, 12:57, Pete_UK wrote:
I think you need to give some further examples showing some which
would fail your criteria, as it looks to me as if they would all pass.

Pete

On Feb 22, 11:22 am, T2net wrote:



Hello,

I have a list in column which may look like

1
2
3a
3b
3g
56
67a
67c

I would like to keep only the rows which contains numbers or numbers +
a character.

Any idea?

Thanks, T2net

MS VB 6.3, Excel 2003, Win2000- Masquer le texte des messages
précédents -

- Afficher le texte des messages précédents -

Oops sorry I meant the "a" character.
I want to keep the rows with numbers (like 1,2, 56) and those with
"a" (3a, 67a) and not the others
T2net