Récuperer le nom du dossier parent

Bonjour à tous,

Voilà j'ai un fichier au format: C:\aaa\bbbb\cccc\dddd\eee.xls , j'aimerai savoir comment faire pour récupérer uniquement le nom du dossier parent c'est-à-dire dddd , sans rien d'autre avant ou après. Tout en sachant que tous mes fichiers n'ont pas forcément les même noms ou ne sont pas forcéments dans les même dossiers.

Merci d'avance

bonjour,

une proposition avec une formule matricielle, à valider par ctrl-maj-entrée

=STXT(CELLULE("Filename";A3);MAX(SIERREUR(TROUVE("\";GAUCHE(CELLULE("Filename";A3);TROUVE("\[";CELLULE("Filename";A3))-3);LIGNE(1:100));0))+1;TROUVE("\[";CELLULE("Filename";A3))-1-MAX(SIERREUR(TROUVE("\";GAUCHE(CELLULE("Filename";A3);TROUVE("\[";CELLULE("Filename";A3))-3);LIGNE(1:100));0)))

ou avec une fonction personnalisée

=parentdir()

code à insérer dans un module

Function parentdir(Optional s = "")
If s = "" Then s = ThisWorkbook.FullName
p = InStrRev(s, "\")
If p <> 0 Then
 p1 = InStrRev(Left(s, p - 3), "\")
 parentdir = Mid(s, p1 + 1, p - 1 - p1)
End If

End Function

Geniaaalll merci ça marche

(Désolé pour le retard j'étais en congé)