Bonjour,
si j'ai bien compris la demande
voici une fonction personnalisée qui permet de concatener le contenu d'un nombre variable de cellules en gardant leur format.
Function concatformat(ParamArray parm())
t = ""
For Each p In parm
If TypeOf p Is Object Then
t = t & p.Text
Else
t = t & p
End If
Next
concatformat = t
End Function
appel de la fonction :
=concatformat(A1,"test",B1,C1,D1)
ou
=concatformat(A1;"test";B1;C1;D1) selon le paramétrage excel