XL 2010 REchercher le nom d'un classeur non actif

deps · 17 Décembre 2016

Bonjour

j'ai un classeur nommé trouvenomfichier.xlsm

depuis ce classeur, j'ouvre un fichier *.csv (données séparées par \)

Je recherche à récupérer le nom du fichier *.csv (ex: coucou.csv) et le coller en cellule L1 du fichier xlsm ?

J'ai utilisé une macro
this.workbooks.name puis workbook
mais j'ai toujours le nom de fichier xls (car c'est celui là qui est actif) et pas celui du csv

Quelqu'un aurait il une idée ?

merci
Deps

sousou · 17 Décembre 2016

Bonjouir
range("l1")= fichier devrait te suffire

gilbert_RGI · 17 Décembre 2016

Bonjour,

un bout de code comme celui ci doit faire

VB:

Fichier = Application.GetOpenFilename("Fichiers .csv (*.csv),*.csv")
lederslash = InStr(StrReverse(Fichier), "\") - 1
nf = Right(Fichier, lederslash)
MsgBox nf

mettre nf en valeur de la cellule L1

mapomme · 17 Décembre 2016

Bonjour sousou,

sousou à dit:
Bonjouir
range("l1")= fichier devrait te suffire

Les gens charmants sur ce forum nous gratifient d'un bonjour. Mais il y en a d’autres qui nous veulent encore beaucoup plus de bien...

sousou · 17 Décembre 2016

deps · 18 Décembre 2016

sousou à dit:
Bonjouir
range("l1")= fichier devrait te suffire

Bonjour a tous

Merci ça fonctionne très bien.
La version de gilbert_RGI permet d'avoir que le nom sans le chemin

merci
Deps

XL 2010 REchercher le nom d'un classeur non actif

deps

XLDnaute Junior

Pièces jointes

sousou

XLDnaute Barbatruc

gilbert_RGI

XLDnaute Barbatruc

mapomme

XLDnaute Barbatruc

sousou

XLDnaute Barbatruc

deps

XLDnaute Junior

Discussions similaires