¿Cómo extraer rápidamente el nombre de archivo de la ruta completa en Excel?
Supongamos que tienes una hoja de cálculo que contiene una lista de rutas de archivos, y ahora deseas extraer solo el nombre del archivo (la parte derecha de la última barra invertida) de cada ruta, como se muestra en las siguientes capturas de pantalla. ¿Hay algún truco rápido para manejar esta tarea?
Extraer el nombre de archivo de la ruta completa con fórmula en Excel
Extraer el nombre de archivo de la ruta completa con Función Definida por el Usuario
Extraer el nombre de archivo de la ruta completa con código VBA
Extraer el nombre de archivo de la ruta completa con fórmula en Excel
En Excel, puedes usar la siguiente fórmula para extraer rápidamente solo el nombre del archivo de la ruta completa.
Selecciona una celda en blanco, introduce la siguiente fórmula en ella y luego presiona la tecla Enter.
=MID(A1,FIND("*",SUBSTITUTE(A1,"\","*",LEN(A1)-LEN(SUBSTITUTE(A1,"\",""))))+1,LEN(A1))
Consejos: A1 es la celda desde la que deseas extraer el nombre del archivo), y presiona el botón Enter, luego arrastra el controlador de relleno al rango que desees. Después de eso, el nombre del archivo se extrae de cada celda.
Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Extraer el nombre de archivo de la ruta completa con Función Definida por el Usuario
Con la siguiente Función Definida por el Usuario, puedes obtener fácil y rápidamente el nombre del archivo.
1. Mantén presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.
Function FunctionGetFileName(FullPath As String) As String
'Update 20140210
Dim splitList As Variant
splitList = VBA.Split(FullPath, "\")
FunctionGetFileName = splitList(UBound(splitList, 1))
End Function
3. Presiona las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones y regresar a la hoja de cálculo. En una celda en blanco, B1 por ejemplo, introduce la siguiente fórmula en ella y presiona la tecla Enter.
=FunctionGetFileName(A1)
Luego selecciona nuevamente la celda B1, arrastra el controlador de relleno al rango donde deseas aplicar esta fórmula, y todos los nombres de archivo se han extraído de las rutas completas como resultado siguiente:
Extraer el nombre de archivo de la ruta completa con código VBA
Además de la Función Definida por el Usuario, un código VBA también puede ayudarte a extraer los nombres de archivo. Por favor, haz lo siguiente:
1. Mantén presionadas las teclas ALT + F11 para abrir la Ventana de Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.
Sub GetFileName()
'Update 20140210
Dim Rng As Range
Dim WorkRng As Range
Dim splitList As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
splitList = VBA.Split(Rng.Value, "\")
Rng.Value = splitList(UBound(splitList, 1))
Next
End Sub
3. Luego presiona la tecla F5 para ejecutar este código, y selecciona el rango del cual deseas extraer el nombre del archivo, ver captura de pantalla:
4. Y luego haz clic en Aceptar, los nombres de archivo se han extraído de la selección como sigue:
Nota: Con este código VBA, los datos originales serán destruidos, así que deberías hacer una copia antes de aplicar este código.
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos