¿Como debo usar adecuadamente el "IsNumeric"?

Dante

El siguiente código arroja resultado erróneo, ¿por qué sera?

If ANALISIS_MONTAJE.MdeO <> "" And IsNumeric(ANALISIS_MONTAJE.MdeO) And (Val(Hoja3.Range("V2"))) <> "" And IsNumeric(Val(Hoja3.Range("V2"))) Then
ANALISIS_MONTAJE.TextBox20 = Val(Hoja3.Range("V2")) * (Val(ANALISIS_MONTAJE.MdeO.Value))
End If

Por favor y en cuanto puedas, quisiera puedas darme una mano.

1 respuesta

Respuesta
1

Para revisarlo, puedes decirme qué resultado esperas y qué resultado estás obteniendo.

También pon un ejemplo de los valores que tienes en esto:

ANALISIS_MONTAJE.MdeO

Hoja3. Range("V2")

'

Te comento, en la celda Hoja3. Range("V2") tienes un texto y utilizas esto:

Val(Hoja3. Range("V2")) la función Val te regresa un 0, si tienes un texto, luego preguntas,

IsNumeric(Val(Hoja3. Range("V2")))

Como val te regresó un 0, entonces siempre es numérico, por lo tanto, siempre se cumple que lo que tengas en V2 sea numérico.

Te sugiero que en estas condiciones no utilices el Val:

(Val(Hoja3. Range("V2"))) <> "" And IsNumeric(Val(Hoja3. Range("V2")))

Deberías poner:

Hoja3. Range("V2") <> "" And IsNumeric(Hoja3. Range("V2"))

Saludos. Dante Amor

Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas