Supprimer certaines lignes

[maclem88]

Bonsoir le forum
Voila j'ai un petit soucie je cherche a supprimé toutes les lignes dans mon tableau dont la valeur marge n'est pas négative et gardé juste celle qui sont en couleur comme pourrais je faire.
merci d'avance pour votre aide

[mercatog]

Proposition qui pourrait être généralisée(Utilisation d'un filtre automatique)

Code :

1
2
3
4
5
6
7
8
9
Sub SuppPositif()
 
Application.ScreenUpdating = False
With Worksheets("Feuil1")
    .Range("C6:H36").AutoFilter Field:=5, Criteria1:=">=0"
    .Range("C8:H36").SpecialCells(xlCellTypeVisible).EntireRow.Delete
    .AutoFilterMode = False
End With
End Sub

[maclem88]

Merci d'avoir pris le temps de me répondre mais je ne mis connais pas trop avec excel et la avec votre code je dois faire quoi ?

[Thordek]

Bonjour Maclem88.

Dans Excel, tu ajoute l'onglet développeur, tu va dans visual basic (le bouton tout à gauche), tu ajoute un module (je te laisse chercher), tu copies-colles le code de Mercatog dans le module, et tu fais F5 (exécuter la macro).

Bien sur, il faut que tu sois sur la feuille Excel où il y a tes données.

Tiens-moi au courant.

Cordialement,

Thordek