Suppression de ligne avec condition Ok

Salut à tous

J'ai un tableau qui contiendra des données.

Je souhaite que lorsqu'on saisit le mot OK dans une cellule de la colonne K, que la ligne correspondante se supprime?

J'ai une macro qui surprime la ligne selon la valeur de la cellule dans une colonne voulus.

Du coup, après avoir taper tout t'est ok, en activant la macro sa supprimera toutes les lignes correspondantes.

Mais pas pas dès le moment où tu écris ok:

    Sub Supprime()
    Dim dlg As Long, i As Long, j As Long
    Application.ScreenUpdating = False

    dlg = ActiveSheet.UsedRange.Rows.Count

    For i = dlg To 1 Step -1

        If Cells(i, 11).Value Like ("OK") Then Rows(i).Delete
    Next i

    End Sub

Salut zombe et le forum

Dans le module lié à ta feuille, colle cette macro :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Range, Plage As Range
Set Plage = Intersect(Target, Columns(11))
If Plage Is Nothing Then Exit Sub
For Each Cel In Plage
    If Cel = "OK" Then Rows(Cel.Row).Delete
Next Cel
End Sub

La boucle n'est là que pour une modification de plusieurs cellules avec un copier/coller.

La macro ne fonctionnera que sur la colonne K (11) et si tu mets un "OK" (pas "ok")

La macro s'exécdutera dès la validation de ta cellule

A+

Salut Basosa et Gorfael

Merci pour vos propositions qui ont permis de résoudre mon problème.

J'ai opté pour le code évènementiel.

Cordialement