Si cellules identique en Colonne A copier cellule colonne B

Bonjour,

désolé pour ce titre un peut naze.... Mais je ne sais pas décrire ma requête en une phrase

Je cherche a Sélectionner deux lignes dont leur valeur est "AR__O" et "RF__O" en Colonne A sachant que la colonne A comporte des Cellules de valeur Quelconque. Puis En colonne C, Si deux cellules sont identique, Alors Copier la Valeur de la Cellule du bas pour la coller sur la cellule du haut en colonne H.

Vous Allez comprendre grâce la Pièce-Jointe.

Salut,

Un essai ci-joint.

Cordialement.

Bonjour Yvouille,

Merci pour cette réponse. Cela fonctionne a merveille .

Bonne journée.

Sub Bouton_Regroupement()
    Dim i As Integer, j As Integer
    For i = 1 To Range("A65000").End(xlUp).Row
    If Cells(i, 1) = "AR__O" Then
    For j = i + 1 To Range("A65000").End(xlUp).Row
    If Cells(j, 1) = "RF2_O" And Cells(j, 3) = Cells(i, 3) Then
    Cells(i, 8) = Cells(j, 8)
    End If
    Next j
    End If
    Next i
End Sub