Remplacer avec formule concatener

Bonjour,

J'aimerais faire une macro.

colonne C : COMMISSIONS FACTURE NUMERO 20200901089501305

J'aimerais remplacer toute la colonne c comportant le mot COMMISSIONS avec une formule concatener("COM FACT AU ";'RELEVE CIC'!K1)

J'ai essayer :

Sub MAJBNP()

Columns("C:C").Select
Dim cellule As Range
For Each cellule In ActiveSheet.UsedRange
If cellule.Value = "*" & "COMMISSIONS" & "*" Then cellule.FormulaR1C1 = "=CONCATENATE(""COM FACT AU "",'RELEVE CICMAD'!RC[3])"
Next cellule
End Sub

ça ne marche pas.

Merci pour votre aide,