Problème avec les boucles VBA

Bonjour,
Je ne maîtrise pas bien les algorithmes et je voudrais savoir si quelqu’un connaît une boucle VBA qui recherche dans la colonne G, une cellule égale à la cellule A1, et qui renvoie alors en L1, la cellule I de la ligne correspondante.
Ex : si A1=G24 alors on colle I24 en L1.

Puis que l’opération se répète pour les cellules A2, A3, … A1000.
Si quelqu’un a ça en tête, merci de me contacter

bonjour luge29 le forum a tester

Code:

---

1 2 3 4 5 6 7

Sub es() Dim i As Long Application.ScreenUpdating = False For i = 1 To Cells(Rows.Count, 7).End(xlUp).Row If Cells(i, 7) = Cells(i, 1) Then Cells(i, 9) = Cells(i, 12) Next i End Sub

---