Funcon Change en Userform Excel

[Rolex09]

Buenas tardes, tengo el siguiente problema:

Realice un Userform para que pase los datos a celdas de Excel, y en este userform en algunos TextBox utilice formulas manejando la funcion Change, el problema es que al colocar los datos en el userform todo lo hace bien y de hecho lo pasa a las celdas que corresponden pero detiene la macro al final, mandando error

"Se ha produciod el error 13 en tiempo de ejecucion: No coinciden los tipos y me ilumina en amarillo la primer linea de la siguiente macro:

Private Sub Gravamen_Change()

TextBox2.Text = (Format((Ingr.Text) * (Gravamen.Text) / 100, "#,##0.00"))

TextBox3.Text = (Format((Ingr.Text) + ((Ingr.Text) * (Gravamen.Text) / 100), "#,##0.00"))

TextBox4.Text = (Format((Ingr.Text) - Val(RetIVA.Text) - Val(RetISR.Text) + ((Ingr.Text) * (Gravamen.Text) / 100), "#,##0.00"))

End Sub

Espero me puedan ayudar, de antemano gracias por su atencion

[Invitado Cacho R]

Hola! Rolex09. La expresión:

(Ingr.Text) * (Gravamen.Text) / 100

"no te va a andar", por la misma razón por la que jamás funcionaría:

("Cacho") * ("Rolex") / 100

¿Te das cuenta del por qué, verdad?...

Saludos, Cacho R.

[Rolex09]

Gracias por tu respuesta, de hecho te comento que si me realiza la operacion y tambien coloca el resultado en la celda indicada pero al final se detiene la macro, como puedo subir aqui el archivo para que lo veas?

[Invitado Cacho R]

Para subir un archivo tienes que mandar un mensaje.

Vas al modo "avanzado" y dentro de "Opciones adicionales" (a mitad de página) verás "Gestionar archivos adjuntos"...

El resto es intuitivo.