MULTICONCAT en Excel

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

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión /  Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión /  Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión /  Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión /  Cambiar )

Conectando a %s

This site uses Akismet to reduce spam. Learn how your comment data is processed.

Blog de WordPress.com.

Subir ↑

A %d blogueros les gusta esto: