Supprimer des lignes si

Bonjour à tous,

Suite à plusieurs examens scolaires, un tableau a été créé ;

Il est composé de 2 colonnes :

La première contient les noms des candidats

La deuxième contient leurs notes

Les candidats ne se sont pas tous présentés à l’examen.

Je veux conserver dans mon tableau seulement les candidats ayant au moins une note.

Autrement dit, je veux supprimer les lignes des candidats n’ayant jamais eu de note.

Je ne sais pas si c’est compréhensible, mais j’ai mis un fichier en exemple très clair...

Merci beaucoup pour votre aide!

Bonjour,

A adapter avec les bons noms de feuille et les bonnes colonnes :

Sub SupprLigne()
' Macro Zirak pour Excel-Pratique

Dim i As Integer, Derlign As Integer

Derlign = Worksheets("Feuil1").Range("B65365").End(xlUp).Row

For i = Derlign To 2 Step -1
    If Worksheets("Feuil1").Range("C" & i) = "-" Then
        Range("A" & i).EntireRow.Delete
    End If
Next i

End Sub

Cordialement,

Merci!

De rien,

Bonne fin de journée et bon week-end.