Problème avec le fonction Match

Problème avec le fonction Match - VB/VBA/VBS - Programmation

Marsh Posté le 12-02-2012 à 18:10:27    

Bonjour,
 
j'ai une petite question à vous soumettre.
Dans un classeur excel j'ai 2 listes de références chacune dans une feuille. L'une est mise à jour à chaque lancement de la macro, l'autre est constante.
Ce que je cherche à faire c'est d'ajouter dans la liste de la feuil1 les références de la liste de la feuil2 n'y figurant pas encore.
 
La clé se trouve sans doute dans une boucle avec une fonction Match, mais malgré pas mal d'essais je n'y arrive pas :(


Message édité par snipecmoileretour le 12-02-2012 à 19:19:27

---------------
Mon Feedback  | galerie Photo
Reply

Marsh Posté le 12-02-2012 à 18:10:27   

Reply

Marsh Posté le 12-02-2012 à 18:56:57    

voici un exemple de ce que j'essaye
 
 
    For boucle = 1 To nb_lignes
        If Application.WorksheetFunction.Match(Sheets("import" ).Cells(boucle, 1), Sheets("bdd" ).Range("A:A" ), 0) = -1 Then
            lastrow = Sheets("bdd" ).UsedRange.SpecialCells(xlCellTypeLastCell).Row
            Sheets("bdd" ).Cells(lastrow + 1, 1) = Sheets("import" ).Cells(boucle, 1)
            Sheets("bdd" ).Cells(lastrow + 1, 2) = Sheets("import" ).Cells(boucle, 2)
        End If
        boucle = boucle + 1
    Next
 
mois j'ai une erreur sur le match :(
un petit peu d'aide serait la bienvenue


---------------
Mon Feedback  | galerie Photo
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed