concatener deux cellules par macro

bonjour a tous ,

j essaie de réunir le résultat de deux cellules par macro

le code que j utilise est

If Application.Intersect(Target, Range("C1:iv2")) Is Nothing Then


Target.Offset(4, 0) = Target & Target.Offset(2, 0)
end if


ce que je souhaite est lorsque je change la valeur d une des cellules soit sur la ligne 1 ou la ligne 2 que le résultat en ligne 4 soit la concaténation de la cellule activée de la ligne 1 et la ligne 2


merci de votre aide

cordialement

ghislain