Buenas tardes amigos

Nesecito su valiosa colaboracion para poder resumir un conjunto de datos de un listado en otro listado , esto lo necesito hacer sin la ayuda de una tabla dinamica la cual no me es funcional en el proyecto que estoy haciendo.

les dejo el adjunto con el ejemplo que quiero hacer

agradeciendo de antemano

Saludos cordiales

Ejercicio.xls

¿A qué te refieres con "que se llene sola"?.........explica con más detalle lo que necesitas, por favor.....U

Un saludo,

Tese

Buen dia Juan:

Te Anexo archivo con posible solución. El inconveniente, si es que lo es, es que la Tabla 01 te la ordena por fecha y por articulo.

En la hoja "Resumen", a partir de la celda A3, están la lista por fecha y artículos sin repetir.

Saludos... Comentas si te fue util

Ejercicio_JaeL.xls

Prueba el siguiente codigo en el libro que subiste!

Option Explicit


Sub unicos()

Dim rng As Range


With ThisWorkbook.Sheets("Hoja1")

    Set rng = .Range("A1").CurrentRegion.Offset(1)

    Set rng = rng.Resize(rng.Rows.Count - 1)

    .Range("J:K").Clear

    rng.AdvancedFilter xlFilterCopy, rng.Rows(1), .Range("J2"), True

End With

End Sub

[/CODE]

Hola huatson70 , el macro que me enviaste realiza las fucniones tal como las necesito , el unico detalle es que es muy pesado la carrida de este resumen, tarda demaciado.

Saludos y gracias de antemano