Où est la faute ? Merci.

[boulou]

Range("C" & DL) = ExecuteExcel4Macro("'" & Chemin & "[ClasseurE.xls]Feuil1'!R10C2")

Je n'arrive pas à importer la valeur de la cellule B10, de la feuille 1, d'un classeur E, situé dans le même répertoire.

 

[mromain]

Re : Où est la faute ? Merci.

bonjour boulou,

je ne connais pas du tout ce type de macro, mais on dirait qu'il y a un soucis de syntaxe (qu'il manque "') :
Range("C" & DL) = ExecuteExcel4Macro("'" & Chemin & "[ClasseurE.xls]Feuil1'!R10C2"'")

a+

 

[michel_m]

Re : Où est la faute ? Merci.

Bonjour
il te manquait le "\"
Range("C" & DL) = ExecuteExcel4Macro("'" & Chemin & "\[ClasseurE.xls]Feuil1'!R10C2")

 

[michel_m]

Re : Où est la faute ? Merci.

Pour mromain (bonjour)
Il s'agit de la macro Excel 4 dite de "Walkenbach"
Elle permet d'extraire la valeur d'une cellule d'un fichier fermé

 

[mromain]

Re : Où est la faute ? Merci.

salut michel_m,

merci pour l'info, je me mets ce fil de côté 🙂

a+

 

[boulou]

Re : Où est la faute ? Merci.

Bonjour
il te manquait le "\"
Range("C" & DL) = ExecuteExcel4Macro("'" & Chemin & "\[ClasseurE.xls]Feuil1'!R10C2")

Michel, merci mais toujours pas bon..............

 

[STephane]

Re : Où est la faute ? Merci.

hmm,hmm, chez moi cela marche très bien
Chemin = ActiveWorkbook.Path
Range("C" & 1) = ExecuteExcel4Macro("'" & Chemin & "[Classeur1.xls]Feuil1'!R1C1")

 

[boulou]

Re : Où est la faute ? Merci.

hmm,hmm, chez moi cela marche très bien
Chemin = ActiveWorkbook.Path
Range("C" & 1) = ExecuteExcel4Macro("'" & Chemin & "[Classeur1.xls]Feuil1'!R1C1")

Steph.
Voici ma macro globale. Je ne vois pas de différence par rapport à ta ligne alors où est l'anomalie.
Merci.

Sub Conso()
DL = Range("A65000").End(xlUp).Row + 1
Chemin = ActiveWorkbook.Path & "\"
Range("A" & DL) = Date
Range("B" & DL) = ExecuteExcel4Macro("'Feuil1'!R10C6")
Range("C" & DL) = ExecuteExcel4Macro("'" & Chemin & "\[ClasseurE.xls]Feuil1'!R10C2")
Range("D" & DL) = ExecuteExcel4Macro("'Feuil5'!R3C1")
End Sub

 

[STephane]

Macro XL4 - Accès à classeur fermé

essaye sans rajouter d'antislash, tu en as 2 alors que j'en ai zéro.