Saludos. Estoy enfrentando un inconveniente en mi código VBA. Al cargar los datos en la hoja "Recibo", la información se traslada correctamente a la hoja "Historico", ubicándose en las celdas correspondientes sin problemas. Sin embargo, al momento de imprimir el Recibo, la celda correspondiente a "Saldo Anterior" (que debería conservar su valor original) muestra el monto actual del "Saldo", lo cual es incorrecto. Agradecería orientación para evitar que esa celda sea modificada antes o durante la impresión.
Recibo Inmobiliaria 1.xlsm
Por
dorgelis, · publicado
Buenos Días:
Se me esta presentando un error al ejecutar un formulario, el error es:
Se ha producido el error -2147467259 (80004005) en tiempo de ejecución : Error no especificado .
Quien me pueda colaborar o guiar como solucionarlo.
Este error me sale cuando ejecuto esta procedimiento en el TRMAnt.SetFocus
Private Sub VlrProfAnt_afterupdate()
If Not IsNumeric(VlrProfAnt.Value) And VlrProfAnt.Value <> vbNullString Then
VlrProfAnt.SetFocus
MsgBox "El Valor ingresado no es numerico"
Else
VlrProf = VlrProfAnt.Value
TRMAnt.SetFocus
End If
End Sub
Muchas Gracias por su ayuda para saber como corregirlo.