Supprimer un ligne dans excel

marieg58 -  
mic13710 Messages postés 1165 Date d'inscription   Statut Membre Dernière intervention   -
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

Réponse 1 / 3
mic13710 Messages postés 1165 Date d'inscription   Statut Membre Dernière intervention   360
 
Il faudrait peut être mettre des guillemets à "VRAI"
Ou bien si c'est un vrai "VRAI", remplacer VRAI par True

Michel
0
Réponse 2 / 3
marieg58 Messages postés 25 Statut Membre
 
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
Réponse 3 / 3
mic13710 Messages postés 1165 Date d'inscription   Statut Membre Dernière intervention   360
 
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