Saludos Profesor Sergio, de ante mano gracias por responder, realice lo que me sugirió coloque el código donde me indicó, sin embargo me sigue arrojando el mismo error.
' Restaurar formato de fuente
With wsHistorico.Rows("2:2").Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
' Incrementar automáticamente el número de recibo
wsRecibo.Range("J2").Value = wsRecibo.Range("J2").Value + 1
'Corrección de Error en impresión
Application.Wait (Now + TimeValue("0:00:01"))
' Imprimir
wsRecibo.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Por
dorgelis, · publicado
Hola, buenos días.
Necesito ayuda de toda la comunidad para resolver un problema en el trabajo. Referente a stock de productos por modelo, talla y unidades totales.
La cuestión es, tengo una base de datos con tres columnas, A B y C, donde:
A = referencia artículo
B = talla
C = unidades
Tal como va llegando al almacén voy añadiendo la referencia, talla y unidades.
¿Como puedo conseguir luego que me agrupe todas las referencias (A) y tallas (
que sean las mismas y luego que me sume las unidades ©.
Espero haberme explicado correctamente, os agradezco antemano vuestra colaboración.
Un saludo!
Frank.
Ejemplo:
Según el excel que ahora subiré: [TABLE=width: 311]
[TR]
[TD]034 complemento hp
[/TD]
[TD]L
[/TD]
[TD=align: right]7 stock total.
[/TD]
[/TR]
[/TABLE]
Libro Referencias de PRUEBA.xls