Supprimer ligne sur critère

alfrede -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je travaille sous excel 2007 et je suis novice en VBA, j'ai une tableau de 5 colonnes, je souhaiterais supprimer entièrement une ligne lorsqu'une cellule de la colonne A est supérieur à 600 000.

help please!

Merci
A voir également:

2 réponses

chossette9 Messages postés 6855 Date d'inscription   Statut Contributeur Dernière intervention   1 312
 
(Re) Bonjour,

cette fois-ci il faudra passer par une macro, tu n'y couperas pas :D
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
re,

bon, puisqu'il faut le faire par macro, allons y

conditions de la macro
étiquettes de champs en ligne 1 à adapter

Sub enlever_svt_criter()
     Application.ScreenUpdating = False
    derlig = Cells(Cells.Rows.Count, 1).End(xlUp).Row
    ActiveSheet.Range("A1:E" & derlig).AutoFilter Field:=1, Criteria1:=">=600000"
    With Range("A2:E" & derlig)
          .SpecialCells(xlCellTypeVisible).EntireRow.Delete
          .AutoFilter
    End With
End Sub


mais tu pourrais le faire quand m^me sans macro....je l'ai fait en améliorant une macro faite avec l'enregistreur
0