Supprimer une plage de données si la ligne contient "x"

Bonjour à tous,

novice en macro, j'aurai besoin de votre aide pour ce qui suit :

J'ai créé cette macro pour supprimer les lignes qui contiennent un certain nom (remplacé par xxx) :

Sub Find_Erase_PSS_Manual()

Dim J As Long

For J = 1110 To 31 Step -1

If Range("C" & J) = "xxx" Then Rows(J).ClearContents

Next J

End Sub

Le probleme c'est que dans ces lignes il y a des calculs qui sont égelement supprimés et don't j'ai besoin par la suite. Cela fausse donc mes calculs de totaux.

Je pense qu'il faudrait limiter la suppression à une plage de colonne (A:M) mais excel ne l'accepte pas sans numéro de ligne.

Est ce qu'il existe un moyen générique pour dire au logiciel qu'il doit supprimer la plage selon la ligne considérée ?

Merci d'avance.

Bonjour

Limites l'effacement

Sub Find_Erase_PSS_Manual()

Dim J As Long
For J = 1110 To 31 Step -1
If Range("C" & J) = "xxx" Then Range("A" & J & ":M" & J).ClearContents
Next J

End Sub

Wah trop genial merci 1000 fois !!!!!!

Rechercher des sujets similaires à "supprimer plage donnees ligne contient"