Extraire l'adresse du dossier a partir de l'adresse du fichier - VB/VBA/VBS - Programmation
Marsh Posté le 30-10-2008 à 11:25:06
C'est plus la peine de chercher, j'ai trouve!
Dim chaine As String
Dim Emplacement As String
chaine = "c:\troud\ieyo jeoh\thee_nhno\jhneljhelhj.test"
Emplacement = Mid(chaine, 1, InStrRev(chaine, "\", -1, 1))
Marsh Posté le 30-10-2008 à 09:04:36
Salut,
J'ai une petite question stupide (c'est les seules que je maitrise!) :
Dans une macro VBA sous Excel, je recupere l'adresse d'un fichier (ex C:\Utilitaires\MacrosVBA\toto.output) et je souhaiterais en extraire l'emplacement, ie l'adresse du dossier (ici C:\Utilitaires\MacrosVBA\).
J'ai bien pense a faire supprimer les derniers caracteres, mais vu que mon nom de fichier est variable, c'est plus tordu. Existe-t-il une commande qui me ferait ca tout seul ou bien dois-je faire une petite boucle qui supprime le caractere tant que ce n'est pas "\"? (un peu lourd non?)
Merci d'avance
Message édité par malaka le 30-10-2008 à 09:06:08