Concatenar datos segun criterio

[estepanuno]

Hola a todos

tengo un problemilla

tengo una lista con una serie de datos, mi pregunta es la siguiente:

habria alguna macro capaz de leer en la columna Ahasta donde ponga TOTAL PROVEEDOR y concatenar los datos de la columna n?

Gracias a todos por vuestro tiempo y la labor de aprendizaje

un saludo

01-Prueba.xls

[tese1969]

Concatenar o sumar?

Por lo que he visto en tu archivo de prueba, parece que se trata de una suma.

Un saludo,

Tese

[estepanuno]

Hola compañero TESE

Lo primero agradecerte tu interes ,en realidad lo que quiero es lo que dice el enunciado, concatenar los números con un signo + entre ellos

Agradecería cualquier ayuda

Gracias por todo

[tese1969]

Entonces, estepanuno, lo que necesitas es concatenar los valores de las filas anteriores a "Total proveedo" (falta la "r" en el archivo) excepto la de "Total Bono".....¿Es así?

Un saludo,

Tese

[estepanuno]

Exactamente Tese

has dado en el clavo

Un saludo y mil gracias por tu tiempo

[tese1969]

Una última duda, estepanuno....

He visto que los datos de la columna "N" son números almacenados como texto (de hecho, aparece ' delante de los números). ¿Esa es la situación real ó son números? Te lo digo por modificarlo directamente en el ejemplo y empezar a trabajar sobre esa base.

Un saludo,

Tese

[estepanuno]

En realidad deberían de ser numeros

Un saludo

[tese1969]

Buenas, estepanuno

Creo que algo hemos logrado.......a ver si es lo que buscas.

He incluido un módulo con una macro. Desconozco tus conocimientos en estos temas, así que por si acaso nunca has ejecutado una macro, con el archivo abierto pulsa Alt + F8 y te aparecerá una ventanita donde puedes elegir la macro del archivo. La seleccionas y pulsas ejecutar.......

Pruébalo y me cuentas.....

Un saludo,

Tese

01-Prueba_Tesev1.xls

[tese1969]

¿Lo has podido probar?

He visto que has entrado varias veces al foro posteriormente y no has comentado nada.

Un saludo,

Tese

[estepanuno]

Buenos dias Tese

Lo primero es agrdecerte tu ayuda con este tema, de corazon

Funciona de cine, y de una persona que esta empezando en este mundillo con ganas de aprender es de agrdecer que haya personas que compartan sus conocimientos con los demas, gracias

Perdona por nom contestar antes, pero en el trabajo esta la cosa super liada

Un saludo

[Armando Montes]

Hola, se que ya esta solucionado pero adjunto otra opcion en el archivo de Tese:

01-Prueba_Tesev1.xls

[estepanuno]

hola a todos

me vais a perdonar pero me ha surgido otra duda

se podria poner al pricipio de concatenar un "+" para poder identificar con un buscarv?

gracias por vuestra paciencia

[tese1969]

Buenas, estepanuno

Incluye la 3ª línea del siguiente código en el tuyo y en la 7ª incluye el signo + dentro de los paréntesis que ya tenías, para que te quede así:

Sub concatena_proveedor()

Application.ScreenUpdating = False

concatenado = "+"

For Each valor In Range("a1:a" & Range("a20000").End(xlUp).Row)

If valor Like "TOTAL PROVEEDO*" Then

valor.EntireRow.Columns("n") = Left(concatenado, Len(concatenado) - 1)

concatenado = "+"

GoTo otro:

End If

If valor Like "TOTAL BONO*" Or valor Like "TOTAL CAMION*" Then GoTo otro:

concatenado = concatenado & valor.EntireRow.Columns("n") & "+"

otro:

Next valor

MsgBox "Datos concatenados", vbInformation, "Fin del Proceso"

Application.ScreenUpdating = True

End Sub[/CODE]

Un saludo,

Tese

[Armando Montes]

Viste mi ejemplo? no has comentado.