Cette formule

Bonjour

j'essaie de récupérer une cellule dans un classeur 100002.xlsx

pourrier vous m'aidez a corrigé cette formule

='["&AF4&""&E4&".xlsx]Feul1'!$K$38

la cellule AF4 est d:\dossier\

la cellule E4 est 100002

k38 est la cellule à recupérer

merci

Bonjour

Il faut utiliser INDIRECT() mais ne fonctionne que sur fichier ouvert

=INDIRECT("'" & AF4 &"[" & E4 & ".xlsx]Feuil1'!$K$38")

ou plus simple

=INDIRECT("'[" & E4 & ".xlsx]Feuil1'!$K$38")

Attention tu avais marqué "Feul1" (sans le i )

Merci de ton aide ... sa fonctionne MAIS

Il faut absolumtent que le fichiers 100002.xlsx soit ouvert si non sa me donne un #REF!

dans ma cellule.

Bonjour

schoret a écrit :

Il faut absolumtent que le fichiers 100002.xlsx soit ouvert

oui je te l'avais indiqué

Banzai64 a écrit :

ne fonctionne que sur fichier ouvert

Je sais qu'il existe une macro complémentaire "Morefunc" (recherche avec ton ami) mais je ne sais pas m'en servir

morefunc fonctionne pas avec Excel 2013

J'ai trouvé ma reponce

On peut lire dans un classeur fermé avec une simple formule :

'www.commentcamarche.net/forum/affich-23485758-excel-reference-externe-classeurs-fermes#p28362994
Sub LireFichierFermé() 
Dim NomFichier As String 
Dim Chemin As String 
Dim Formule As String 

  ActiveSheet.Range("A1").ClearContents 

  Chemin = "D:\Temp\" 
  NomFichier = "Classeur_à_lire.xls" 
  Formule = "='" & Chemin & "[" & NomFichier & "]Feuil1" & "'!" & "A1" 
  ActiveSheet.Range("A1").Formula = Formule 
  ActiveSheet.Range("A1").Value = ActiveSheet.Range("A1").Value 

End Sub 

Cordialement 
Patrice