Concatenate VBA that keeps currency format

Hi Guys,

I've read a couple of threads about Concatenate VBA to preserve the format, (in my case is only two currency types.), but I couldn't adapt the answers to my case, even because most part of my code is coming from the very nice help of PCI (a forum member).

I would need to have the concatenation in Sheet2 of columns A:B:C:D:E:F keeping the format ($#,##0.00 or [$€-2] #,##0.00) but without mess up the code, any help is much appreciated.

the concatenate part is :

Please Login or Register  to view this content.

the entire code is :

Please Login or Register  to view this content.

try using the text function in your formula

Formula:

Please Login or Register  to view this content.

It works for currency, time and dates as demonstrated in this example.

Please Login or Register  to view this content.