Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Excel 2003 VBA récupérer les trois premières lettres du nom du mon fichier dans une variable StrPath

Excel 2003 VBA récupérer les trois premières lettres du nom du mon fichier dans une variable StrPath

3 réponses
Avatar
Céline Brien
Bonjour à tous,
Dans une macro, je crée une variable StrPath.
Plutôt que de préciser le mois comme ceci :
StrPath = "R:\Report\Jan\"
J'aimerai récupérer les trois premières lettres du nom de mon classeur
ouvert.
Quelque chose qui ressemble à ceci :
StrPath = "R:\Report\" & Left(NomFichier, 3) & "\"
Merci de votre aide,
Céline
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Youky
Salut Céline
Remplace NomFichier par
ThisWorkbook.Name
et c'est OK
Youky
"Céline Brien" a écrit dans le message de
news:
Bonjour à tous,
Dans une macro, je crée une variable StrPath.
Plutôt que de préciser le mois comme ceci :
StrPath = "R:ReportJan"
J'aimerai récupérer les trois premières lettres du nom de mon classeur
ouvert.
Quelque chose qui ressemble à ceci :
StrPath = "R:Report" & Left(NomFichier, 3) & ""
Merci de votre aide,
Céline





Avatar
MichDenis
En supposant que ton classeur ait été déjà enregistré au moins une fois

StrPath = "R:Report" & Left(Dir(ThisWorkbook.FullName), 3) & ""

"Céline Brien" a écrit dans le message de news:

Bonjour à tous,
Dans une macro, je crée une variable StrPath.
Plutôt que de préciser le mois comme ceci :
StrPath = "R:ReportJan"
J'aimerai récupérer les trois premières lettres du nom de mon classeur
ouvert.
Quelque chose qui ressemble à ceci :
StrPath = "R:Report" & Left(NomFichier, 3) & ""
Merci de votre aide,
Céline
Avatar
Céline Brien
Bonjour à tous,
Bonjour Youky,
Bonjour MichDenis,
Merci beaucoup pour vos réponses.
J'ai utilisé les codes de MichDenis.
De bon codes comme toujours ;-)
Le tout fonctionne très bien.
Merci encore et bonne journée,
Céline

"MichDenis" a écrit dans le message de news:

En supposant que ton classeur ait été déjà enregistré au moins une fois

StrPath = "R:Report" & Left(Dir(ThisWorkbook.FullName), 3) & ""

"Céline Brien" a écrit dans le message de
news:

Bonjour à tous,
Dans une macro, je crée une variable StrPath.
Plutôt que de préciser le mois comme ceci :
StrPath = "R:ReportJan"
J'aimerai récupérer les trois premières lettres du nom de mon classeur
ouvert.
Quelque chose qui ressemble à ceci :
StrPath = "R:Report" & Left(NomFichier, 3) & ""
Merci de votre aide,
Céline