Concatenar las descripciones de los productos con el mismo nombre?

nombre      descripcio           concatenado

a                  pesentacion           presentacion + en cada articulo

a                  en cada articulo

b                acabado                     acabado

Respuesta
1

Gracias ya pude resolver el inconveniente que tenia gracias

Sub UnirDatos()
f = 2
nom = Range("A" & f).Value
Do While Range("A" & f).Value <> ""
If Range("A" & f) = nom Then
c = c + Range("B" & f).Value + " "
Else
Range("C" & f).Value = c + Range("B" & f)
c = ""
End If
nom = Range("A" & f + 2).Value
f = f + 1
Loop
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas