Access - Extraer nombre carpeta

   
Vista:

Extraer nombre carpeta

Publicado por Luis (16 intervenciones) el 09/10/2014 02:52:28
Hola mi siguiente duda esta en lo siguiente desde un boton extraigo la ruta de una carpeta este es un ejemplo
C:\Users\Armando\Documents\Excel Finanzas\ Informe1
ahora mi pregunta radica en lo siguiente:

como podria extraer el siguiente nombre de la carpeta para guardarlo en otro campo ejmplo "Excel Finanzas"

si me proponen hacerlo mediante MID ya lo intente y no
porque no porque el nombre de esa carpeta puede cambiar puede ser mas largo o mas corto

Si tienen alguna otra solucion se los agradecere

Saludos a esta gran Comunidad
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Extraer nombre carpeta

Publicado por Jesús Manuel (134 intervenciones) el 09/10/2014 09:09:04
Hace un par de semanas tuve un problema similar, en mi caso quería obtener el nombre de un archivo que podría variar y lo resolví con lo siguiente:

Supongamos que guardas la ruta en una variable llamada RutaCadena

1) Con la función Len obtengo el tamaño de la cadena
Len(RutaCadena)

2) Con la función InStrRev busco en que posición esta la última barra \ de la cadena. La posición la marca justo antes de la \ por lo que tendrías que sumarle 1 al valor que obtienes
InStrRev(RutaCadena, "\") + 1

3) Con la función Mid , pasando la cadena, la posición que obtengo en el punto 2 y el tamaño de la cadena del punto 1 consigo el nombre del archivo
Mid(RutaCadena, InStrRev(RutaCadena, "\") + 1, Len(RutaCadena))

De esta forma puede cambiar tanto el nombre de la carpeta como la ruta.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar