Macro pour supprimer des lignes sous conditions

Bonjour tous,

Dans le fichier ci-joint, j'aimerai sur la feuille 3 en cliquant sur le bouton "SORT" que les lignes de la colonne K contenant les données commençant par "000/0" soit supprimées à partir de la cellule k18 jusqu'à K32005 .

Auriez vous une macro pour faire ça?

Merci d'avance à tous.

Bonjour,

Un exemple

Cdlt

Option Explicit
Public Sub Suppression()
Dim i As Long
    Application.ScreenUpdating = False
    For i = 32005 To 18 Step -1
        If Left(Cells(i, "K"), 5) = "000/0" Then Rows(i).EntireRow.Delete
    Next
End Sub

Bonjour,

essaye ce code

Sub supprimer()

sheets(3).select

For i = 18 To 32005

If (Left(Cells(i, 11), 5) = "000/0") Then Rows(i).EntireRow.Delete

Next

End Sub

A+

Merci Jean-Éric et El Ayoubi.

j'ai suivi la proposition de Jean-Éric. Ca fonctionne très bien. Emcore merci à vous messieurs et bonne journée.