Visual Basic - crear una division en cajas de textos

Life is soft - evento anual de software empresarial
   
Vista:

crear una division en cajas de textos

Publicado por jovanny (2 intervenciones) el 07/10/2015 21:44:14
Private Sub FechaProxMant_Change()
Range("G7").Select
ActiveCell.FormulaR1C1 = FechaProxMant
FechaProxMant.Text = 250 / Val(HRSTRABDIA.Text)

esta division manda error 11

como la corrijo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de xve

crear una division en cajas de textos

Publicado por xve (178 intervenciones) el 08/10/2015 07:36:48
Hola Jovanny, que contiene HRSTRABDIA.Text??
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

crear una division en cajas de textos

Publicado por jovanny (2 intervenciones) el 08/10/2015 16:22:22
esta caja de texto puede conterner cualquier valor para realizar la división
ejemplo 250/24 donde este se va a cargar en HRSTRABDIA.Text
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

crear una division en cajas de textos

Publicado por programador viajero (518 intervenciones) el 11/10/2015 02:23:34
el error 11 es divicion por cero
250/0 es dificil
revisa si lo esta cargando a HRSTRABDIA.Text
intentale asi:
Private Sub FechaProxMant_Change()
Range("G7").Select
ActiveCell.FormulaR1C1 = FechaProxMant.text
FechaProxMant.Text = 250 / Val(HRSTRABDIA.Text)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar