Access - Extraer nombre carpeta

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

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.