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
¿Alguien conoce el motivo por el que aparece este formato de celdas si en la celda señalada figura un texto?
Solo ocurre en algunas celdas de una hoja. Todas las celdas han sido extraidas de la misma fuente de datos y se han tratado por igual.
Este problema provoca que no pueda copiar el contenido de la celda en otro lugar...
Gracias,