Bonjour,
j'ai un code qui met à jour la colonne D de la feuil activé par rapport à la colonne E de la feuil Base de données.
Ce code il prends comme critère de recherche la colonne C de la feuil active par rapport à la colonne D de la feuil Base de données.
Je souhaite utilisé ce code sur un autre mais j'ai pas pu l'adapter.
Je souhaite avoire une recherche multi critère :
1 colonne B de la feuil active / colonne A de la feuil Base de données
2 colonne C de la feuil active / colonne B de la feuil Base de données
et la colonne à mettre à jour est E de la feuil active par rapport à la colonne C de la base de donénes.
Est ce que quelqu'un d'entre vous pourrait m'aider ?
Merci d'avance
j'ai un code qui met à jour la colonne D de la feuil activé par rapport à la colonne E de la feuil Base de données.
Ce code il prends comme critère de recherche la colonne C de la feuil active par rapport à la colonne D de la feuil Base de données.
Je souhaite utilisé ce code sur un autre mais j'ai pas pu l'adapter.
Je souhaite avoire une recherche multi critère :
1 colonne B de la feuil active / colonne A de la feuil Base de données
2 colonne C de la feuil active / colonne B de la feuil Base de données
et la colonne à mettre à jour est E de la feuil active par rapport à la colonne C de la base de donénes.
Est ce que quelqu'un d'entre vous pourrait m'aider ?
Merci d'avance
Code:
Sub Mise_à_jour_n°_pièce()
Application.ScreenUpdating = False
Set bdd = Worksheets("Base de données")
L = 3 'Ligne de début
nblig1 = ActiveSheet.Range("C" & Rows.Count).End(xlUp).Row
For i = L To nblig1
ActiveSheet.Cells(i, "D") = WorksheetFunction.VLookup(ActiveSheet.Cells(i, "C").Value, bdd.Range("$d$2:$e$2000"), 2, False)
Next
Application.ScreenUpdating = True
End Sub