Excel 2003 macro supression de lignes sous conditions

Bonjour,

sous excel 2003, je voudrais créer une macro qui efface des lignes lorsque une cellule de ces lignes contient une valeur définie.

par exemple dans mon tableau, j'ai dans une colonnes des cellules contenant le texte Homme ou Dame.

je voudrais effacer toutes les lignes concernant les hommes.

Pouvez vous m'aider je suis perdu en visual basic

Bonsoir

Il doit bien exister une multitude de façons de supprimer des lignes

Sans plus de renseignements sur l'organisation des tes données, voici une macro qui te supprimera toutes les lignes, pour peu que dans une de ses cellules il y a le mot "Homme"

Option Explicit

Sub Supprime()
Dim Cel As Range

  Application.ScreenUpdating = False
  Do
    Set Cel = Cells.Find(what:="Homme", LookIn:=xlValues, lookat:=xlWhole)
    If Cel Is Nothing Then Exit Sub
    Rows(Cel.Row).Delete
  Loop
End Sub

Bonjour,

Merci beaucoup ca fonctionne superbement bien