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 usuarios de AyudaExcel, ya en el sector de Excel en General habia abierto un nuevo tenahttps://www.ayudaexcel.com/foro/threads/ayuda-para-generar-reporte-de-una-hoja-excel.36897/
ayer por la tarde encontre una macros "indico el enlace http://www.todoexcel.com/foro-excel/macros/imprimir-con-subtotales-van-vienen-t16042.html" en que me genera un subtotal pero tengo el problema que da un sub total entre el titulo de impresion y area de impresion
el archivo del problema y ejemplo dejo el link https://mega.co.nz/#!pxlz1Q6Z!s-ECzwMUxItTzrs5qJhg2cvPE97JFk3HdhnLYwaskuk
si me pueden ayudar que la macros me genere este TOTAL PARCIALES y TOTAL GENERAL dejo una imagen de ejemplo
Sin nada mas saludos.
H.A.V.