Recherche conditionnelle

Bonjour. Un peu d'aide svp pour trouver une macro qui puisse résoudre mon problème !

J'ai une Feuil1 avec X lignes (nombre de ligne variable selon les semaines) et 2 colonnes A et B et une Feuil2 ayant la même structure que Feuil1.

La routine est la suivante :

Pour la ligne X de Feuil1 :

si le contenu de Ax est présent dans la colonne A de Feuil2 alors remplace la valeur contenue dans Feuil1!Bx par celle contenue dans Feuil2!Bx

Ligne suivante jusqu'à dernière ligne

MERCI BEAUCOUP !

Bonjour,

Joignez un classeur avec des données non confidentielles, afin de mener des tests...

A+

Bonjour,

Essaye ce code

Sub maj()
Dim Lignes_1 As Integer 'nombre de lignes de Feuil1
Dim lignes_2 As Integer ' Nombre de lignes de Feuil2
Dim Valeur_testée As String 'Valeur de la colonne B de Feuil2

Lignes_1 = Sheets(1).Cells(Rows.Count, 1).End(xlUp).Row 'N° de la dernière ligne de Feuil1
lignes_2 = Sheets(2).Cells(Rows.Count, 1).End(xlUp).Row 'N° de la dernière ligne de Feuil1

For X = 2 To lignes_2
Valeur_testée = Sheets(2).Range("A" & X)
    For Y = 2 To Lignes_1
        If Sheets(1).Range("A" & Y) = Valeur_testée Then
            Sheets(1).Range("B" & Y) = Sheets(2).Range("B" & X)
        End If
    Next

Next

End Sub

je pense

Rechercher des sujets similaires à "recherche conditionnelle"