¿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
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.
