Effacer ligne selon critère
Résolu
noe2008
Messages postés
191
Statut
Membre
-
noe2008 Messages postés 191 Statut Membre -
noe2008 Messages postés 191 Statut Membre -
Salut les amis,
j'ai essayé de créer une macro pour effacer des lignes pour toutes les cellules de la colonne A ou on trouve le texte : "faux" ou "false" mais le code que j'ai testé ne marche pas , jai besoin de votre aide , merci
voici le code que j'ai testé :
Dim n As Long
For n = 1 To 200
If Cells(n, 1).Value = "faux" or "false" Then
Rows(n).Delete
End If
Next n
j'ai essayé de créer une macro pour effacer des lignes pour toutes les cellules de la colonne A ou on trouve le texte : "faux" ou "false" mais le code que j'ai testé ne marche pas , jai besoin de votre aide , merci
voici le code que j'ai testé :
Dim n As Long
For n = 1 To 200
If Cells(n, 1).Value = "faux" or "false" Then
Rows(n).Delete
End If
Next n
Configuration: Windows / Chrome 86.0.4240.75
7 réponses
-
Bonsoir
A tester
If Cells(n, 1).Value = 0 or 1 Then
-
Bonsoir
Si "Faux" ou "False" est une saisie
Dans ce casDim n As Long For n = 1 To 200 If Ucase( Cells(n, 1).Value) = "faux" or Ucase(Cells(n, 1).Value) ="false" Then Rows(n).Delete End If Next n
-
Bonjour,
Il faut surtout partir de la dernière ligne et remonter vers la première.For n=200 to 1 step -1 next n
Cdlt -
Bonjour,
ma contribution:
Option Explicit Sub test() Dim i As Long For i = Range("A65536").End(xlUp).Row To 1 Step -1 If Cells(i, 1) = "Faux" Or Cells(i, 1) = "false" Then Cells(i, 1).EntireRow.Delete Next End Sub
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Bonsoir,
ton faux ou false résulte d'une formule ou c'est juste un texte saisie/cellules ?
-
-
