Ecrire une partie d'un chemin d'accès dans une cellule
Bonjour à tous,
Je me tourne vers vous après quelques heures de recherche infructueuse.
Dans mon classeur excel (Recap.xlsx) j'utilise une valeur contenue (en case A1) dans un autre classeur (Résultat 1.xlsx) dans un autre dossier (Dossier 1). J'y accède en utilisant la formule suivante :
='C:\Users\Desktop\Exemple\Dossier 1\[Résultat 1.xlsx]Feuil1'!A1
Je dispose d'un autre dossier (Dossier 2) contenant également un classeur nommé Résultat 1.xslx, auquel je peux accéder de la manière suivante :
='C:\Users\Desktop\Exemple\Dossier 2\[Résultat 1.xlsx]Feuil1'!A1
J'aimerai pouvoir faire varier une partie de mon chemin d'accès afin d'automatiser l'accès en utilisant une cellule pour notifier le dossier auquel accéder.
En quelque sorte
='C:\Users\Desktop\Exemple\&F3&\[Résultat 1.xlsx]Feuil1'!A1
Avec F3 modifiable à volonté.
J'ai fait plusieurs tentatives notamment avec la fonction INDIRECT mais sans succès.
Merci d'avance de votre aide !
AP
Slt ArtPav,
Avec INDIRECT ca doit fonctionner mais le problème c'est que le fichier doit être ouvert!
=INDIRECT(CONCATENER("'C:\Users\Desktop\Exemple\";F3;"\[Résultat 1.xlsx]Feuil1'!A1"))je pense qu'il faut passer par VBA
Bonsoir,
Merci de votre réponse, j ai fini par réussir (apres avoir pas mal galerer sur la syntaxe) en utilisant INDIRECT.EXT
Cordialement
ok tres bien,
bon j'étais entrain de te préparer une macro, donc elle sert juste pour info
Sub Recup2FichierFermer()
Chemin = "C:\Users\Desktop\Exemple\"
Fichier = "Résultat 1.xlsx"
Feuil = "Feuil1"
Dossier = Range("F3").Value
Plg = Range("A1").Address(1, 1, xlR1C1)
Ref = "'" & Chemin & Dossier & "\[" & Fichier & "]" & zeuil & "'!" & Plg
[I24] = ExecuteExcel4Macro(zRef) ' I24 c'est la celulle où le resultat doit apparaitre, à adapter!
End SubOui, au temps pour moi !
A1 = chemin
A2 = nom fichier
Feuil1'!A5 = emplacement de la donnée d'intérêt
=indirect.ext("'"&A1&"["&A2&".xls]Feuil1'!A5")
Merci encore