Récupérer le nom d'un dossier d'une arborescence

zaknaster

XLDnaute Nouveau
Bonjour à tous,

J'ai récupéré l'arborescence complète d'un dossier à partir d'un bouton "Parcourir" en VBA. Cette arborescence se retrouve dans un variable nommée "Dossier".

Par exemple, je choisis ce dossier: "C:\Temp\DossierMachin\SousDossier\DossierCible"

Je souhaiterai pouvoir récupérer dans une autre variable, uniquement "DossierCible", est-ce possible ?

Merci par avance.
 

Pierrot93

XLDnaute Barbatruc
Re : Récupérer le nom d'un dossier d'une arborescence

Bonjour zacnaster,

peut être comme ceci, si j'ai bien compris :

Code:
Dim var1 As String, var2 As String
var1 = "C:\Temp\DossierMachin\SousDossier\DossierCible"
var2 = Mid(var1, InStrRev(var1, "\") + 1)
bon après midi
@+
 

suistrop

XLDnaute Impliqué
Re : Récupérer le nom d'un dossier d'une arborescence

salut,

si tu met ton chemin C:\toto\titi\tata dans la cellule 1,1
alors la cellule 1,2 sera tata

Code:
Cells(1, 2) = Right(Cells(1, 1), InStr(StrReverse(Cells(1, 1)), "\") - 1)
a+
 

Discussions similaires


Haut Bas