Trier colone conserver que les nombres

Bonjour,

Dans une colone j'ai des cellules avec des nombres et d'autres avec du texte, j'aimerai conserver que celles qui contiennent un nombre, et supprimer la ligne entiere pour les autres.

Je vous remercie par avance.

Biz Lisa

Bonsoir

Pour supprimer par exemple les lignes contenant du texte en colonne C

Code Module

Sub DétruireLignesC()
derniereLigne = ActiveSheet.UsedRange.Rows.Count
Application.ScreenUpdating = False
For r = derniereLigne To 1 Step -1
If Not IsNumeric(Range("C" & r)) Then Rows(r).Delete
Next r
End Sub

Cordialement

Bonsoir

Range("A2:A" & [A65000].End(xlUp).Row).SpecialCells(xlCellTypeConstants, 22).EntireRow.Delete

le fait très bien aussi....

Bonne soirée

Un grand merciiii à vous