Comparaison valeur de deux cellules

Bonjour à nouveau à toutes et à tous.

Je souhaite réaliser une macro qui compare par exemple la valeur de la cellule G4 avec la valeur de la cellule F5 et ainsi de suite.

Comparaison de G5 avec F6, G6 avec F7,etc.

Si la valeur des deux cellules comparées est identique alors on colore ces cellules.

Quelqu'un pourrait-il m'aide ?!

Voici mon code :

Sub Doublon()

Dim i As Integer

For i = 4 To Cells(Rows.Count, 1).End(xlUp).Row

If Cells(i, 4).Value = Cells(i + 1, 3).Value Then

Cells(i, 4).Interior.ColorIndex = 28

Cells(i + 1, 3).Interior.ColorIndex = 28

End If

Next i

End Sub

Bonjour Marion1587,

Si vraiment tu veux faire ça avec du code, pas de problème...

Mais avec une MFC, ça marche aussi et plus simplement...

A+ Daniel

Merci il est toujours utile d'apprendre de nouvelles choses

Mais je souhaite une macro VBA !

Pas de réponse ?!