Což se jen pro úplnost dá řešit elegantně naprgáním vlastní funkce ve VBA, níže uvedená "slepí" dohromady neomezený počet řetězců:

Kód:
Function JoinStrings(ParamArray retezce() As Variant) As String

For Each arg In retezce
    JoinStrings = JoinStrings & arg
Next arg

End Function