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
Amigos míos, tengo una duda.
Existe una manera de mostrar y/o ocultar los objetos (control ActiveX, controles de formulario, comentarios, etc.) en la hoja activa ?¿
Se como ocultar los objetos en el libro, pero hacerlo en la hoja activa no doy con la solucionen.
Agradecido de antemano por vuestra ayuda.
Saludos.