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
Buenos días,
Os expongo mi problemática:
Tengo una tabla donde indico el día de cambio de velocidad de la línea de producción.
Por otro lado tengo otra tabla donde calculo la eficiencia de la línea de producción
Lo que quiero es automatizar la columna en amarillo, buscando la velocidad en la tabla de intervalos de fecha. ¿alguna idea de como hacerlo?
Adjunto fichero.
Muchas gracias y un saludo
UDK
buscar en intervalo de fechas.xlsx