Trouver les manquants dans une liste

Bonjour,

J'ai une liste de bon de livraison de 15000 lignes, et j'aimerai mettre en lumière les numéros absent de la liste.

Par exemple :

102

103

104

106

107

Il manque le 105 ...

je n'ai aucune idée de comment faire.

Merci par avance.

Bonjour,

Tu n'as pas un exemple + concret (la feuille réelle par exemple)

si le 105 est placé + bas dans la liste ?

Amicalement

Claude.

Voici les 220 première lignes :

https://www.excel-pratique.com/~files/doc2/BonLivraison.xls

J'aimerai savoir quel sont les Bon de Livraison manquant dans la liste.

Merci

re,

Ce code colore en jaune les N° qui ne se suivent pas, c'est suffisant ?

Sub Manques()
''Macros par Claude Dubois pour "Jelucyr" Excel-Pratique le 5 Oct 09
Dim Lg As Integer, Cel As Range
    Application.ScreenUpdating = False
    Lg = Range("A65536").End(xlUp).Row
        For Each Cel In Range("a1:a" & Lg)
            If Cel.Offset(1, 0) <> Cel + 1 Then
                Cel.Offset(1, 0).Interior.ColorIndex = 6
            End If
        Next Cel
End Sub

Claude.

C'est déjà très bien !

Merci beaucoup

re,

Avec numérotation des N° manquants en colonne C

Sub Manque()
''Macros par Claude Dubois pour "Jelucyr" Excel-Pratique le 5 Oct 09
Dim Lg As Integer, Cel As Range, i As Byte
    Application.ScreenUpdating = False
    Lg = Range("A65536").End(xlUp).Row
        For Each Cel In Range("a1:a" & Lg)
            If Cel.Offset(1, 0) <> Cel + 1 Then
                i = 1
                Do While Range("c65536").End(xlUp) < Cel.Offset(1, 0) - 1
                    Range("c65536").End(xlUp)(2) = Cel + i
                    i = i + 1
                Loop
                Cel.Offset(1, 0).Interior.ColorIndex = 6
            End If
        Next Cel
End Sub

Fichier

https://www.excel-pratique.com/~files/doc2/fRR6HManque_BonLivraison.xls

Claude.

Tout simplement parfait !

Merci Claude !

re,

Merci de remplir la petite formalité

en bas à gauche, en étant connecté

Claude.