Este truco es muy útil cuando estamos manejando gran cantidad de datos. En algún momento de nuestras vidas utilizando Excel necesitamos concatenar muchos códigos que están distribuidos en columnas o filas, pues podríamos usar la opción concatenar que trae Excel, pero si son miles de datos nos va a llevar algo de tiempo.

Estos datos que acabo de colocar nos van a servir de ejemplo, para poder crear un formula que concatene los datos de este rango, vamos a crear una nueva fórmula, para esto vamos a usar VBA.
En VBA vamos a agregar un nuevo módulo.

Ahora ya agregado en nuevo módulo vamos a agregar el siguiente código.

Una vez agregado el código nos aparece una nueva función en Excel, que se llama MULTICONCAT.

Seleccionamos la fila o columna que queremos concatenar.

Y ahora ya aparece concatenados todos los códigos que seleccionamos.

PD: Adjunto código VBA
Function MULTICONCAT(lista As Range)
Dim ncell As Range
Dim m_concat As String
m_concat = «»
i = 1
For Each ncell In lista
If ncell <> «» Then
If i = 1 Then
m_concat = m_concat & ncell.Value
Else
m_concat = m_concat & «,» & ncell.Value
End If
End If
i = i + 1
Next ncell
m_concat = m_concat & «»
MULTICONCAT = m_concat
End Function