Ajout de lignes si non présente dans le tableau

Bonjour

J'ai un fichier excel, avec un tableau en feuille 1 avec des référence en A.

Et un autre tableau en feuille 2 avec le mème type de référence en B.

J'aimerais importer les référence de la feuille 2 en feuille 1 sauf celle qui y sont déjà bien sur et ce en VBA.

je ne sais pas si je suis clair?

J'ai bien pensé le faire avec la rechercheH mais je ne vois pas comment, et en VBA serais plus clair a mon avis.

Merci de votre aide.

26essaiv1.xlsm (16.29 Ko)

bonjour,

une proposition, performante si pas trop de données.

Sub aargh()
    Set f1 = Sheets("F1")
    Set f2 = Sheets("F2")
    dlf1 = f1.Cells(Rows.Count, 1).End(xlUp).Row
    For i = 3 To f2.Cells(Rows.Count, 2).End(xlUp).Row
        If f1.Columns(1).Find(f2.Cells(i, 2)) Is Nothing Then
            dlf1 = dlf1 + 1
            f1.Cells(dlf1, 1) = f2.Cells(i, 2)
        End If
    Next i
    Set f1 = Nothing
    Set f2 = Nothing
End Sub

sa marche

Merci.

plus qu'a rajouté la suite de mon code.

Merci

Rechercher des sujets similaires à "ajout lignes presente tableau"