Concatenate with forced lineshift (CHAR(10)) - Not working in VBA.

Trying to solved what should be simple.

I have text I need to combine in one new cell, thru VBA.
When entering the string manual in excel it works, once I use the same line in vba, is return with "name error"

Tried TextJoin - cant get the CHAR(10) to work.

Thanks for all your comming suggestions.