Función Personalizada para Extraer Números o Letras de una Celda Excel con VBA

[@JeremiasPerrone]

Y si tengo números con "," valores NO ENTEROS?...esta fórmula me quita las COMAS...como hago para que respete los decimales?.

[@CdrsAlejandro]

Hola! No puedo descargar el archivo y el codigo que pusiste en la descripcion esta incompleto! Como puedo importar el codigo de manera correcta?

[@Contabilizalo]

mira: ----------------CÓDIGO DE LA FUNCIÓN ---------------------- Function EXTRAER_WILMER(cadena As String, Optional extrae_solo_numeros As Boolean = True) As String Dim caracter As Long Dim resultado As String Dim caracter_encontrado As String resultado = "" For caracter = 1 To Len(cadena) caracter_encontrado = Mid(cadena, caracter, 1) If extrae_solo_numeros = True And IsNumeric(caracter_encontrado) = True Then resultado = resultado & caracter_encontrado ElseIf extrae_solo_numeros = False And Not IsNumeric(caracter_encontrado) Then resultado = resultado & caracter_encontrado End If Next caracter EXTRAER_WILMER = resultado End Function

[@Nadie-w2]

Como seria para que extraiga además números decimales? Ej. BOLSA DE AZUCAR X 7.5 KG, que extraiga 7.5

[@Contabilizalo]

Extraelo como modo número, y luego lo formateas y listo!

[@EJAB7829]

Cada vez que se cierra el libro hay que realizar el mismo proceso porque en realidad no se guarda

[@Contabilizalo]

NO: 1. ten todos los libros de Excel cerrados cuando realices este procedimiento, 2. Guarda el libro con la función como un complemento de Excel en la ruta que arroja por defecto (complementos)... sigue los pasos en detalle y verás como te funciona.

[@zid_6.069]

Mano no seas tann redundante, no te vayas por la ramas, si vas a explicar como extraer valores numéricos, céntrate en eso. No es de interés si copias, lo pegas si haces malabarismos con tu fórmula.

[@Contabilizalo]

algunas personas preguntan justamente lo que tu asumes como hecho, sabias??

[@zid_6.069]

@@Contabilizalo Eso es material de otro video, conseguí un video de 3 minutos que explica lo mismo que tú. Tú te echas 15 minutos.