Supprimer un ligne dans excel

Fermé
marieg58 - 5 avril 2011 à 16:02
mic13710 Messages postés 1088 Date d'inscription samedi 26 novembre 2005 Statut Membre Dernière intervention 13 mai 2021 - 5 avril 2011 à 17:05
Bonjour,
J'ai un tableau excel avec en colonne F soit vrai ou Faux.
Je voudrais supprimer toutes les lignes qui sont à Vrai dans une macro
J'ai écrit le code suivant :
Dim i
For i = Range("a65536").End(xlUp).Row To 1 Step -1
If Cells(i, 6) = VRAI Then Rows(i).Delete
Next

E là il me laisse toutes les lignes à vrai
Je ne comrpends pas pourquoi
Merci de votre aide
A voir également:

3 réponses

mic13710 Messages postés 1088 Date d'inscription samedi 26 novembre 2005 Statut Membre Dernière intervention 13 mai 2021 354
Modifié par mic13710 le 5/04/2011 à 16:07
Il faudrait peut être mettre des guillemets à "VRAI"
Ou bien si c'est un vrai "VRAI", remplacer VRAI par True

Michel
0
marieg58 Messages postés 24 Date d'inscription lundi 4 avril 2011 Statut Membre Dernière intervention 9 décembre 2021
5 avril 2011 à 16:27
en mettant des guillements, plus aucune suppression ne se fait.
Si je remplace vrai par faux, il laisse quand meme les lignes a vrai
Je suis désespérée !
0
mic13710 Messages postés 1088 Date d'inscription samedi 26 novembre 2005 Statut Membre Dernière intervention 13 mai 2021 354
Modifié par mic13710 le 5/04/2011 à 18:56
C'est normal puisque vous prenez la colonne A pour compter en non la F et il faut aussi spécifier que c'est d'un texte dont il s'agit.
Mettez ce code et tout devrait marcher :
Dim i    
For i = Range("F65536").End(xlUp).Row To 1 Step -1    
If Cells(i, 6).Text = "VRAI" Then Rows(i).Delete    
Next    

Vous pouvez aussi écrire le If comme ceci :
If Cells(i, 6) = True Then Rows(i).Delete 

Michel
0