Extraer número cadena de texto vba
Hola,
Como puedo extraer solo los números de una cadena de texto, por ejemplo, "Juanike Vicius 45" o "Extr890aer".
Tengo la cabeza rota ya...
Muchas gracias!
Respuesta
1
Que tal puedes probar lo siguiente:
dim i as integer
dim NumeroCadena as string
dim cadena as string
cadena = "Juan19Cardenas"
for i =1 to len (minumero)
if isnumeric (mid (cadena,i,1)) then
NumeroCadena = (mid (cadena,i,1))
debug.print NumeroCadena
endif
next
visita mi blog:
http://www-todoaccess.blogspot.com