Numeros como textos

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