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
De mi mayor consideración
soy completamente nuevo en esto de crear macros y me gustaron mucho los cursos pero recurro al foro por motivos en las siguientes dudas
no se mucho de programación vbasic
lo que quiero hacer es un kardex de clientes con códigos para cada uno y de cada cliente agregar notas de deuda y pagos
no se si me pudieran colaborar en este sentido o orientarme para lograr esta plantilla
atentamente
Juan Arce