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 Compañer@s;
Hace un tiempo puse una consulta de cómo se podría guardar los cambios producidos en una pestaña sin guardar los cambios de las demás.
Funcionaba muy bien pero para el excel que lo necesito ahora me está dando muchos problemas ( lentitud, fallos en cierre, etc…).
Sería posible, lo contrario, es decir, que guarde todos los cambios producidos en las pestañas menos en la que yo especifique.
Os adjunto el que me pasaron.
Muchas gracias y un saludo,
Cambios en hojas.xls