Recherche de nom de fichier dans chemin complet

tototiti2008

XLDnaute Barbatruc

• 28 Mai 2008

• #2

Re : Recherche de nom de fichier dans chemin complet

Bonjour Sly,

Ton idée est excellente
Le nom des fonctions :
InStrRev(CheminComplet,"\") te donneras la position du "\"
Right(CheminComplet,Longueur) te permettra d'extraire les derniers caractères
et
Len(CheminComplet) te donnera la longueur totale du chemin

Le résultat :
Right(CheminComplet,Len(CheminComplet)-InStrRev(CheminComplet,"\"))

🙂

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 28 Mai 2008

• #3

Re : Recherche de nom de fichier dans chemin complet

Bonsoir Sylvain


Si j'ai bien compris, essaye peut être comme ceci, textbox placé sur un USF :

Code:

Dim t As String
t = Mid(Textbox1.Value, InStrRev(Textbox1.Value, "\") + 1)

bon après midi
@+

 

Vote positif 0 Vote négatif

S

stikouhm

Guest

• 28 Mai 2008

• #4

Re : Recherche de nom de fichier dans chemin complet

sinon tu as un truc tout fait qui permet de bien gerer les fichiers :

Set fs = CreateObject("Scripting.FileSystemObject")
nom_fichier = fs.getFileName(Textbox1.Value)

et hop ^^
si tu veux plus d'info va dans l'aide VBa d'excel, en tappant FileSystemObject
tu y trouveras ton bonheur.

 

Vote positif 0 Vote négatif

S

Sly le globe trotter

XLDnaute Occasionnel

• 28 Mai 2008

• #5

Re : Recherche de nom de fichier dans chemin complet

Magnifique 🙂
Merci à vous deux pour ces solutions !

 

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 28 Mai 2008

• #6

Re : Recherche de nom de fichier dans chemin complet

bonsoir

je sais que j'arrive en retard mais tu peux également utiliser :

Code:

MsgBox Dir(TextBox1)

bonne soirée
michel

 

Vote positif 0 Vote négatif