XL 2010 Suppression ligne dont une colonne contient un zero

[polyteis]

Bonjour
Je suis à la recherche d une macro qui supprimerait les lignes dont la colonne f contient la valeur.
Mon tableau débute à la ligne 6, au dessus j'ai mes entêtes plus autres boutons de macro, qui ne doivent pas disparaitre.

Merci

 

[polyteis]

dessus

La valeur zero

 

[sylvanu]

Bonjour Polyteis,
Un essai en PJ avec :

Sub SupColFnulle()
    Application.ScreenUpdating = False
    DL = Range("F65500").End(xlUp).Row
    Range("F6").Select
    Selection.AutoFilter
    ActiveSheet.Range("$A$6:$G$" & DL).AutoFilter Field:=6, Criteria1:="0"
    Fin = Range("F65500").End(xlUp).Row
    If Fin - 6 > 1 Then
        Rows("6:" & Fin).Select
        Selection.Delete Shift:=xlUp
    End If
    ActiveSheet.Range("$A$6:$G$" & DL).AutoFilter Field:=6
    Selection.AutoFilter
    [A1].Select
End Sub

Le bouton bleu sert uniquement à remplir le tableau pour essai, à défaut de fichier test.