Effacer plage cellule si une collone contient un mot

Dull

XLDnaute Barbatruc

• 16 Juillet 2012

• #2

Re : Effacer plage cellule si une collone contient un mot

Salut reve24, le Forum

dans un Module Standard

Code:

Option Explicit

Sub EssAi()
Dim i As Long, DerLig As Long
DerLig = Feuil1.Range("B" & Rows.Count).End(xlUp).Row
For i = DerLig To 2 Step -1
    If Cells(i, 2) Like "ESS*" Then Rows(i).EntireRow.ClearContents
Next i
End Sub

Bonne Journée

 

Pièces jointes

• Reve24.xlsm

  17.7 KB · Affichages: 57
• Reve24.xlsm

  17.7 KB · Affichages: 59
• Reve24.xlsm

  17.7 KB · Affichages: 60

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 16 Juillet 2012

• #3

Re : Effacer plage cellule si une collone contient un mot

Bonjour reve et dull

une variante :

Code:

Sub e()
derligne = Range("A" & Rows.Count).End(xlUp).Row
For i = 1 To derligne
    If LCase(Left(Range("B" & i), 3)) = "ess" Then
        Range("A" & i & ":E" & i).ClearContents
    End If
Next
End Sub

juste à noter que dans le cas de l'effacement la boucle peut s'exécuter indifféremment en montant ou en descendant, contrairement à la suppression pour laquelle il est beaucoup plus simple de remonter (step -1)

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 16 Juillet 2012

• #4

Re : Effacer plage cellule si une collone contient un mot

Re le Fil, Salut Eric🙂,


Effectivement avec ta méthode que ce soit de haut en bas ou vice versa cela fonctionne.
Cela vient d'un vieux traumatisme 🙁 ou j'essayais, avec cette méthode, de Supprimer les lignes😱.

Bonne Journée

 

Vote positif 0 Vote négatif

R

reve24

XLDnaute Occasionnel

• 16 Juillet 2012

• #5

Re : Effacer plage cellule si une collone contient un mot

Ton code doit posseder erreur
derligne = est en jaune

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 16 Juillet 2012

• #6

Re : Effacer plage cellule si une collone contient un mot

Re

on est lundi, donc je ne suis peut-être pas réveillé, mais je n edécèle pas d'erreur, ni sur le code de Dull ni sur le mien

sauf que si tu as testé mon code sur le fichier de Dull, Option explicit t'oblige à déclarer tes variables et dans ce cas derligne est inconnu

un petit

dim derligne as long

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 16 Juillet 2012

• #7

Re : Effacer plage cellule si une collone contient un mot

Re le Fil

...MêmeRéponse... 🙂

Bonne Journée

 

Vote positif 0 Vote négatif