A voir également:
- Vba suppression lignes filtrées
- Forcer suppression fichier - Guide
- Suppression compte gmail - Guide
- Suppression page word - Guide
- Excel trier par ordre alphabétique en gardant les lignes - Guide
- Suppression facebook - Guide
3 réponses
Bonjour,
as tu essayé de récupérer le code généré par l'assistant.
En manuel je ferais, Filtre Automatique =!#REF.
CRTL + * Pour Sélectionner le bloc
CRTL + - pour supprimer.
Tu récuperes le code, et tu l'adaptes.
@+
G-Rom
as tu essayé de récupérer le code généré par l'assistant.
En manuel je ferais, Filtre Automatique =!#REF.
CRTL + * Pour Sélectionner le bloc
CRTL + - pour supprimer.
Tu récuperes le code, et tu l'adaptes.
@+
G-Rom
Hello,
J'ai essayé d'utiliser l'assistant manuel.
Ca me donne la formule suivante:
Sub Essai_filtre_suppression()
'
'
Selection.AutoFilter Field:=1, Criteria1:="#REF!"
Rows("7:79").Select
Selection.Delete Shift:=xlUp
Selection.AutoFilter Field:=1
End Sub
Ca fonctionne s'il y a effectivement des #REF! qui ont été trouvés mais si le filtre ne trouve aucun #REF! alors ça me supprime des données valides!!!
Donc pas top!!!
Donc merci pour votre aide pour résoudre ce problème.
J'ai essayé d'utiliser l'assistant manuel.
Ca me donne la formule suivante:
Sub Essai_filtre_suppression()
'
'
Selection.AutoFilter Field:=1, Criteria1:="#REF!"
Rows("7:79").Select
Selection.Delete Shift:=xlUp
Selection.AutoFilter Field:=1
End Sub
Ca fonctionne s'il y a effectivement des #REF! qui ont été trouvés mais si le filtre ne trouve aucun #REF! alors ça me supprime des données valides!!!
Donc pas top!!!
Donc merci pour votre aide pour résoudre ce problème.
as tu essayé d'utiliser la formule "TYPE.ERREUR()"
En mettant cette formule dans la ligne testée et en tapant "=TYPE.ERREUR(cellule testée)" tu obtiendras une valeur,
#NUL! => 1
#DIV/0! => 2
#VALEUR! => 3
#REF! => 4
#NOM? => 5
#NOMBRE! => 6
#N/A => 7
Une autre valeur => #N/A
Du coup, tu n'as plus qu'a tester sur les lignes ou la valeur de ta cellule est 4...
En mettant cette formule dans la ligne testée et en tapant "=TYPE.ERREUR(cellule testée)" tu obtiendras une valeur,
#NUL! => 1
#DIV/0! => 2
#VALEUR! => 3
#REF! => 4
#NOM? => 5
#NOMBRE! => 6
#N/A => 7
Une autre valeur => #N/A
Du coup, tu n'as plus qu'a tester sur les lignes ou la valeur de ta cellule est 4...