Récupérer valeur cellule dans d'autres classeurs Résolu/Fermé

Question

Bonjour, 

Je souhaite récupérer dans un fichier Excel des valeurs de cellules situées dans d'autres fichiers Excel.
Ces fichiers sont dans des dossier différents. La cellule par contre est toujours située au même endroit (même nom d'onglet et même case).
J'ai mis en case A1 le début du chemin d'accès et dans d'autres cases la partie changeante du chemin (cf. photo de l'extract : https://www.cjoint.com/c/IGig4BOtf5k).
Ayant pas mal de valeurs à récupérer ainsi (plusieurs valeurs dans plusieurs fichiers), j'aimerais avoir une formule du style: $A$1&Ai&\[nom du fichier.xlsx]10. Onglet'!$G$2.
Je n'arrive pas à trouver la bonne combinaison avec les bons symboles au bon endroit.
Je pense qu'il doit y avoir une solution avec des formules. J'aimerais me passer de macro pour cela.
Merci d'avance pour votre aide.

DjiDji59430 · Answer

Bonjour à tous,

essaye :
=indirect($A$1&Ai&"\'[nom du fichier]onglet'!$G$2")


Crdlmt

Thibault · Answer

Merci de t'être arrêté sur mon post.
Cette formule ne fonctionne pas. Cela m'indique une erreur #REF!.
Je ne l'ai pas précisé dans mon 1er post mais les formules doivent fonctionner avec les classeurs fermés.
Même avec le classeur ouvert, cela ne fonctionne pas avec cette formule.

Thibault · Answer

J'ai obtenu une réponse sur un autre forum.
Pour info, on est obligé d'utiliser une macro dans ce cas.
Là voici :



Sub Liaison()
Dim chemin$, txt$, tablo, i&
chemin = [A1]
txt = "\[E_0306_v8_8K_QC_report.xlsx]10. Quality KPI'!$G$2"
With [A3].CurrentRegion.Resize(, 2)
    tablo = .Formula 'matrice, plus rapide
    For i = 1 To UBound(tablo)
        tablo(i, 2) = "='" & chemin & tablo(i, 1) & txt
    Next
    Application.DisplayAlerts = False
    .Formula = tablo
End With
End Sub

Récupérer valeur cellule dans d'autres classeurs

3 réponses

Discussions similaires