VBA filtrer une colonne, Sélectionner cellule visible et supprimer

Bonjour,

Je sollicite votre aide pour un besoin de filtre sur une colonne puis sélection valeur #N/A, sélection des lignes visibles et les supprimer?

Ma ligne 6 est la ligne d'entête de mes colonnes, il faut donc filtrer sur cette ligne pour qu'en Colonne 13 donc M de ma base je n'affiche que les NA. Ensuite sélectionner les lignes et les supprimer.

J'ai essayé le code ci-dessous mais cela m'efface la ligne 6 que je ne souhaite pas supprimer :

ActiveSheet.Range("A6:Y6").AutoFilter Field:=13, Criteria1:="#N/A"
Range("A7").End(xlUp).SpecialCells(xlCellTypeVisible).ClearContents
ActiveSheet.Range("A6:Y6").AutoFilter

Merci pour votre aide.

Florian

Bonjour,
Joins un petit classeur pour une aide adaptée du forum.
Cdlt.

Bonjour Eric,

Voici.

Merci.

Bonjour,
Une proposition.
Alt F8 puis exécuter la procédure.
Cdlt.

Public Sub DeleteRowsInErrors()
Dim n As Long, r As Range
    With ActiveSheet
        n = .Cells(.Rows.Count, 13).End(xlUp).Row
        With .Cells(13).Resize(n)
            On Error Resume Next
            Set r = .SpecialCells(xlCellTypeConstants, 16)
            On Error GoTo 0
        End With
    End With

    If Not r Is Nothing Then r.EntireRow.Delete

End Sub

Merci