Bonjour hommaisflo, le forum,
comme le dit si bien MFerrand (qui le tient lui-même de quelqu'un ) : « Un peu court, jeune homme ! » ; ou alors, en supposant que tout l'énoncé de ton exo est contenu dans le titre de ton sujet, je propose ceci à tout hasard :
Sub Essai()
If [A1] = [B1] Then [C1] = [A1] & [B1] 'c'est le signe « & » qui fait une concaténation
End Sub
à toi d'adapter éventuellement les références de cellules, puisque tu n'as pas jugé utile de l'indiquer ; si des cellules sont pas sur la feuille active, tu devras aussi l'ajouter dans ce style : Worksheets("Ventes Février").[A1]
ou Worksheets(3).[A1]
(selon que tu préfères utiliser une référence par nom de feuille ou par n° de feuille = index) ; si par nom, tu peux utiliser aussi cette notation abrégée : ['Ventes Février'!A1]
(c'est idem).
si tu veux faire le job pour toute une colonne, tu peux aussi t'amuser à ajouter une boucle pour balayer toute la plage.
malgré ton manque de précisions, j'te souhaite bonne chance !
note que s'il manque des précisions, les seules qu'on peut facilement accepter est qu'à priori : a) tu utilises un ordinateur (un PC, sauf indication explicite que t'as un Macintosh) ; b) tu utilises Excel (sauf indication explicite que tu utilises un autre tableur ; mais dans tes infos de config, c'est noté « 2016 FR ») ; c) ton ordi est allumé et tu n'as pas de panne de courant (sans ça, tu n'aurais pas pu poster ton sujet, si maigre soit-il ! oh, j'allais oublier : pour la même raison, on sait aussi que t'as pas de panne de réseau ; vive internet ! ).
@MFerrand : si t'en as envie, j'te laisse le soin de compléter mon petit topo par un exemple de boucle plus concret.
(mais j'comprends qu'avec aussi peu d'infos, c'est pas encourageant ! )
dhany