Función para EXTRAER NÚMEROS - Función EXTRAERNUM (UDF)

preview_player
Показать описание
En este video veremos la forma más sencilla de extraer los números de una cadena de texto, utilizando para ello una función definida por el usuario o UDF.

Ya vimos en un video anterior cómo podíamos hacer esto mismo sin tener que tocar el código VBA, pero utilizábamos muchas funciones conjuntamente y diferentes cálculos intermedios.

Mediante esta función UDF tendremos siempre la función dentro del catálogo de funciones (como si fuera una función propia de Excel) necesitando únicamente indicar como argumento la celda que contiene el dato del que deseamos extraer los números.

El código utilizado en el módulo es el siguiente:
---------------------------------------------------------------------------
Function EXTRAERNUM(TODO As Range)
Dim a As Integer
Dim NUMERO As Long
For a = 1 To Len(TODO)
If IsNumeric(Mid(TODO, a, 1)) Then
NUMERO = NUMERO & Mid(TODO, a, 1)
EXTRAERNUM = NUMERO
End If
Next
End Function
---------------------------------------------------------------------------
Mira también estos videos relacionados:
---------------------------------------------------------------------------
🔴 No olvides suscribirte al canal para estar al tanto de todas las novedades en:
----------------------------------------------------------------------------
📄 Artículo en la web:
----------------------------------------------------------------------------
Sígueme en:
----------------------------------------------------------------------------
Gracias por ver el vídeo y suscribirte al canal 😃
Activa también las notificaciones 🔔

#exceltutorial #tutorialexcel #exceludf
Рекомендации по теме
Комментарии
Автор

Miro sus videos y los guardo para cualquier ocasión que los llegara a fue un dia de esos, muchas gracias por compartirlo me aligeraron demasiado el trabajo, saludos

jhonngarcia
Автор

Amigo, ?sabe cuándo saldrán las funciones búsqueda grep?🤔

MateFast_Oficial
Автор

Buenas. Gracias por el vídeo. Estuve haciendo pruebas y me encontré un casuística que genera error. Ejemplo, si introducimos la celda a extraer un caracter especial como guión bajo da error. Ejemplo C854_3😢Por si lo puedes certificar y plantear una nueva versión

PlcvPlcv