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 de antemano muchas gracias por tu ayuda, estoy que me rompo la cabeza tratando de realizar el siguiente macros:
En
una hoja llamada "registro" tengo todos los datos, en la columna b
(turno), columna c (fecha), columna d(cota1), columna e (volumen1),
columna f (cota2) y columna g (volumen2), como son varios datos quiero
que estos al momento de poner un dtpicker inicial y un dtpicker final,
solamente se extraigan los datos comprendidos en dichas fechas y que se
almacenen en otra hoja llamada (Registro).
A su vez tengo dos turnos A y B, en los cuales se colocan diferentes datos por ejemplo:
Turno Fecha Cota 1 Volumen1 cota2 VOlumen2
A 01/01/01 1000 300 2345 100
B 01/01/01 1233 100 2332 109
Osea
al tener dos turnos tengo dos fechas lo que yo quiero es que se genere
un promedio entre los volúmenes y solo ese promedio se grabe junto con
la fecha se grabe en la hoja registro.
Por favor necesito tu ayuda gracias
Libro3.rar