Concaternar textos

hola, Cheeky !

... como encadenar textos, no haciendo referencia a cada celda, sino haciendo referencia a un rango [...]

==> ['tal parece que'] concatenar, en cualquiera de sus 'formas' [funcion o signo de union '&']
SOLO 'trabaja' con elementos 'individuales' [NO 'admite' matrices]
en el caso de alguna matriz en sus argumentos, 'tomara' el primer elemento [solamente]
la siguiente funcion [personalizada] 'trabaja bien' ;)
[ya sea en la hoja o en el libro de macros 'Personal.xls'] ==Function ConcatenarRangos( _
ByRef Rango As Range, _
Optional ByVal Separador As String) As String
Dim Celda As Range, Final As String
For Each Celda In Rango
If Not IsEmpty(Celda) Then
If Final <> "" Then Final = Final & Separador
Final = Final & Celda
End If
Next
ConcatenarRangos = Final
End Function

la 'forma de llamarla' seria [p.e.] en la celda "B1" =ConcatenarRangos(A1:A20,"-")
el segundo argumento es 'opcional' [el/los caracter/es de 'separacion' en la concatenacion]

saludos,
hector.