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
Estimados expertos ;
Necesito , por favor; realizar un ejercicio bastante complejo, que no se por donde empezar:
Debo crear el siguiente formulario, para cargar la base de datos adjunta
La zona debe cargarse desde un libro excel que va adjunto a esta consulta
La región debe cargarse dependiendo de la zona que se seleccione.
Se debe permitir ingresar los datos sin borrar el anterior
Ojala alguien me pueda ayudar
Saludos
meggido
excel adjunto.xlsx
base de datos a llenar.xlsm