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
Buenas noches,
seré lo mas concreta posible,
tengo 2 archivos de excel :
el primer archivo tiene unos rangos de precios
y cada rango tiene un % de descuento asignado.
el segundo archivo solo tiene una fila de precios
y tengo que poner junto a cada precio el % de
descuento que le corresponda según el rango
que se ocupe en el primer archivo.
la cantidad de filas en ambos archivos en variable
muchas gracias,
Maripili,:upset:
maripili.zip