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
Soy novato en el tema, y espero que alguien me pueda ayudar.
Cree un formulario que carga datos en una hoja de excel, en esa hoja se hacen calculos y me los tiene que devolver en el forms. y no logro hacerlo
Ejemplo
En el Combobox24 pongo "nuevo"
en el Textbox128 pongo "500"
en el Combobox21 pongo "efectivo
en el Combobox16 pongo "Pase Libre"
en el combo box4 pongo "1 mes"
En el Combobox23 pongo "nuevo"
en el Textbox129 pongo "500"
en el Combobox20 pongo "efectivo
en el Combobox17 pongo "Pase Libre"
en el combobox pongo "1 mes"
en el textbox que se llama nuevopeso1 me tendria que poner 1000 esto se calcula en la hoja 1 B4 y no logro que se me actualice.
Si alguien me puede ayudar estaria muy bueno. no me deja subir el archivo