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

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 848
dernier inscrit
Djigbenou