Suppression de ligne automatique suivant un critère sur cette même ligne

[StephanC]

Bonjour à tous,

Voici ma problématique :

En extrayant une base de donnée d'un ERP, je me retrouve avec une base de donnée avec l'exemple en pièce-jointe.

Je souhaiterai pouvoir isolé sans avoir à filtrer en faisant ressortir uniquement les lignes qui ont pour ordre "TR90DCI0" et supprimer les lignes n'ayant pas ce critère.

Après de nombreux essaie ainsi que de recherche s'il n'y avait pas de sujet déjà existant, je n'en ai pas trouvé et c'est pourquoi je me permet de poster ça ici.

Cordialement,
Stephan

 

[Jacky67]

Bonjour à tous,

Voici ma problématique :

En extrayant une base de donnée d'un ERP, je me retrouve avec une base de donnée avec l'exemple en pièce-jointe.

Je souhaiterai pouvoir isolé sans avoir à filtrer en faisant ressortir uniquement les lignes qui ont pour ordre "TR90DCI0" et supprimer les lignes n'ayant pas ce critère.

Après de nombreux essaie ainsi que de recherche s'il n'y avait pas de sujet déjà existant, je n'en ai pas trouvé et c'est pourquoi je me permet de poster ça ici.

Cordialement,
Stephan

Bonjour,
...sans avoir à filtrer ????
Il y a une raison ?
Si tu n'es pas rébarbatif au VBA
Une proposition en PJ

 

[WTF]

Bonjour Stephan,
Je ne suis pas très bon en VBA, mais je te propose le code suivant qui sera peut être amélioré par un autre membre du forum

Sub StephanC()
'
' StephanC Macro
'

'
    Range("G1").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$L$20").AutoFilter Field:=9, Criteria1:= _
        "<>TR90DCI0", Operator:=xlAnd
    Rows("2:2").Select
    Range("G2").Activate
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Delete Shift:=xlUp
    Selection.End(xlUp).Select
    Selection.AutoFilter
End Sub

Pour le mettre tu fais Alt F11 et tu le colles dans une feuille Module.

 

[Phil69970]

Stephan, le forum

Ceci devrait correspondre à ce que tu souhaites

Si la solution te satisfait passe la en résolu.

Pour clôturer une demande :
https://www.excel-downloads.com/threads/prefixe-resolu-et-marquer-comme-solution.20029836/

@Phil69970

 

[StephanC]

Merci à vous trois,

En effet, problème résolu bien que désormais il faut que je planche sur ce que vous venez de me faire découvrir.

Cordialement,
Stephan