BUSCA AQUI UN ARCHIVO EXCEL ►

Como separar textos de números y números de texto usando una fórmula

formula separar numeros de textos y textos de numeros

Si alguna vez te preguntaste como hacer para separar textos de números o números de textos de una celda en Excel mediante una fórmula, hoy te traigo una sencilla solución, se trata de una función personalizada (macro) denominada =limpia() la cual hace sencillo el trabajo de separar teniendo en cuenta tres criterios, el tipo 1 separa o extrae solo los números, el tipo 2 separa o extrae todos los caracteres excepto los números y el tipo 3 extrae solo números, de esta forma nos permite efectuar separaciones de acuerdo al criterio que utilicemos, la función tiene estos argumentos =limpia(celda a separar, tipo).

Para tener esta función en tu Excel solo debes de copiar el siguiente código:

Function Limpia(cadena As String, Optional num_car_az As Byte = 1)  
Dim pat As String  
Select Case num_car_az    
Case 2: pat = "[0-9]"    
Case 3: pat = "[^a-z|ñ]"    
Case Else: pat = "[^0-9]"  
End Select  
With CreateObject("vbscript.regexp")    
.Global = True    
.IgnoreCase = True    
.Pattern = pat    
Limpia = .Replace(cadena, "")  
End With  
If num_car_az = 1 Then 
Limpia = CLng(Limpia)
end if
End Function

Luego nos vamos a Excel, presiona ALT + F11 para acceder al editor de Visual Basic, insertamos un módulo.

insertar modulo visual basic excel macros


Pegamos el código tal como se muestra en la imagen, luego cerramos la ventana del editor de visual basic.

edit visual basic macros vba excel

 Ahora desde las funciones personalizadas en la lista de funciones ya la tenemos instalada.

Funciones personalizadas en excel para contadores

y listo, pero sabiendo de que algunos por más instrucciones que uno les deja no lo van a poder hacer dejo el archivo para su descarga.

Funcion Personalizada en excel para separar números de textos y viceversa.xls

Fuente: TodoExcel

Ingresa tu correo electrónico y te convertiré en un experto en Excel. ↓


Agrega tu comentario

Comentarios
  1. Posted by Alex
  2. Posted by Alejo
    • Posted by Gustavo A. Sebastiani Cépeda
  3. Posted by Nelson
    • Posted by Gustavo A. Sebastiani Cépeda
  4. Posted by KARLA
    • Posted by Gustavo A. Sebastiani Cépeda
  5. Posted by Alma
    • Posted by Gustavo A. Sebastiani Cépeda
  6. Posted by Gary
    • Posted by Gustavo A. Sebastiani Cépeda
  7. Posted by Óscar
    • Posted by Gustavo A. Sebastiani Cépeda
  8. Posted by william mora
  9. Posted by Geli
    • Posted by Gustavo A. Sebastiani Cépeda
  10. Posted by Neflÿte
    • Posted by Gustavo A. Sebastiani Cépeda
  11. Posted by jose
  12. Posted by Jorge
  13. Posted by pedro
  14. Posted by ALFRED
    • Posted by Gustavo A. Sebastiani Cépeda
  15. Posted by Héctor Huerta Landa
  16. Posted by Miguedel67
  17. Posted by Juan Manuel
  18. Posted by Al
  19. Posted by Cesar
    • Posted by Gustavo A. Sebastiani Cépeda
  20. Posted by RICARDO
  21. Posted by brissia
  22. Posted by Mario Bonotto
    • Posted by Gustavo A. Sebastiani Cépeda
  23. Posted by Mary Diaz
  24. Posted by Javier Aguilar
  25. Posted by Mauricio Alvarán
  26. Posted by Laura Cristina
  27. Posted by Rodolfo
  28. Posted by Williams
  29. Posted by Franco
    • Posted by Gustavo A. Sebastiani Cépeda
  30. Posted by Jose Martinez
  31. Posted by DLG
  32. Posted by Luis O.