dtorrado

Lo único que se me ocurre, es ir recorriendo la cadena carácter a carácter (con la función Mid), analizando si es un número o no (función IsNumeric). Es decir, e un bucle: For i = 0 To Len(str) Analizas si el carácter es numérico. bFlag =...