BNouveau venuBoris2802Inscrit le :29/05/2016Dernière activité :30/05/2016 à 19:44Version d'Excel :2010Messages1Votes0Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par Boris2802DateAuteur du sujetSujetExtrait du message29/05/2016 à 09:06frisco75 Suppression de ligne si un mot précis est dans les cellulesJe débute Merci pour ce code Sub SuppBIO() Dim I As Integer For I = [A65000].End(xlUp).Row To 1 Step -1 If Not Cells(I, 1).Find("bio") Is Nothing Then Rows(I).Delete Next I End Sub Les lignes que je veux supprimer, le mot se trouve dans la colonne BE, du coup j'ai remplacé le A65000 par BE65...Forums