J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue
dans la cellule d'un autre classeur sans ouvrir celui-ci.
Si tu veux récupérer ce contenu, tape directement dans la cellule de destination :
='D:\MesDocuments\Mondossier\[Monclasseur.xls]Feuil1'!B12
sans te tromper dans la ponctuation !
***
J'ai essayé ceci
='F:\Performa graphique\[MINIMAXIFLEX.xls]Feuil1'!A5
et ça fonctionne correctement.
***
Si tu veux par macro affecter ce contenu à une variable A
A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" & Range(Ref).address
***
J'ai essayé cela
A = "='" & F:\Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 & "'!" & Range("A5").Address
TextBox1.Value = A
et ça ne fonctionne pas. Excel me surligne le \ . Pourquoi ?
***
bonne idée, peux tu nous donner un exemple stp Manu
"Michel MATHYS" a écrit dans le message de news: 459be21b$0$5540$
Voici un petit truc que j'utilise frequemment... je place dans un celllule la formule : ÎLLULE("filename";A1) et tu as le chemin du fichier après il suufit de rajouter ce que tu veux au bout mais le gros (très gros avantage) si tu deplaces ton fichier ou si tu le renommes le chemin se met à jours automatiquement. Tu vas chercher des variables à partir de cette cellule et cela n'oblige pas à modifier le code
"garnote" a écrit dans le message de news:
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue dans la cellule d'un autre classeur sans ouvrir celui-ci. Si tu veux récupérer ce contenu, tape directement dans la cellule de destination : ='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12 sans te tromper dans la ponctuation ! *** J'ai essayé ceci ='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5 et ça fonctionne correctement. *** Si tu veux par macro affecter ce contenu à une variable A A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" & Range(Ref).address *** J'ai essayé cela A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 & "'!" & Range("A5").Address TextBox1.Value = A et ça ne fonctionne pas. Excel me surligne le . Pourquoi ? ***
Serge
bonne idée, peux tu nous donner un exemple stp
Manu
"Michel MATHYS" <micnel02@hotmail.com> a écrit dans le message de news:
459be21b$0$5540$ba620e4c@news.skynet.be...
Voici un petit truc que j'utilise frequemment... je place dans un celllule
la formule : ÎLLULE("filename";A1) et tu as le chemin du fichier après
il suufit de rajouter ce que tu veux au bout mais le gros (très gros
avantage) si tu deplaces ton fichier ou si tu le renommes le chemin se met
à jours automatiquement.
Tu vas chercher des variables à partir de cette cellule et cela n'oblige
pas à modifier le code
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
OZ5FeE1LHHA.1008@TK2MSFTNGP06.phx.gbl...
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue
dans la cellule d'un autre classeur sans ouvrir celui-ci.
Si tu veux récupérer ce contenu, tape directement dans la cellule de
destination :
='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12
sans te tromper dans la ponctuation !
***
J'ai essayé ceci
='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5
et ça fonctionne correctement.
***
Si tu veux par macro affecter ce contenu à une variable A
A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" &
Range(Ref).address
***
J'ai essayé cela
A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 &
"'!" & Range("A5").Address
TextBox1.Value = A
et ça ne fonctionne pas. Excel me surligne le . Pourquoi ?
***
bonne idée, peux tu nous donner un exemple stp Manu
"Michel MATHYS" a écrit dans le message de news: 459be21b$0$5540$
Voici un petit truc que j'utilise frequemment... je place dans un celllule la formule : ÎLLULE("filename";A1) et tu as le chemin du fichier après il suufit de rajouter ce que tu veux au bout mais le gros (très gros avantage) si tu deplaces ton fichier ou si tu le renommes le chemin se met à jours automatiquement. Tu vas chercher des variables à partir de cette cellule et cela n'oblige pas à modifier le code
"garnote" a écrit dans le message de news:
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue dans la cellule d'un autre classeur sans ouvrir celui-ci. Si tu veux récupérer ce contenu, tape directement dans la cellule de destination : ='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12 sans te tromper dans la ponctuation ! *** J'ai essayé ceci ='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5 et ça fonctionne correctement. *** Si tu veux par macro affecter ce contenu à une variable A A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" & Range(Ref).address *** J'ai essayé cela A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 & "'!" & Range("A5").Address TextBox1.Value = A et ça ne fonctionne pas. Excel me surligne le . Pourquoi ? ***
Serge
Daniel
Pompé sur le site de John Walkenbach :
Sub GetValue()
' Retrieves a value from a closed workbook Dim arg As String Chemin = "e:donneesdanielmpfe" NomFichier = "070102.xls" Onglet = "Feuil1" ' Create the argument arg = "'" & Chemin & "[" & NomFichier & "]" & Onglet & "'!" & _ Range("A1").Address(, , xlR1C1) ' Execute an XLM macro A = ExecuteExcel4Macro(arg) End Sub
Daniel
"garnote" a écrit dans le message de news:
Avec un ou 2 , ça ne renvoie pas le contenu de la cellule mais le chemin tel que tu l'as écrit.
Serge
"Daniel" a écrit dans le message de news:
Erratum, il manque un antislash après graphique : A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5" Daniel "Daniel" a écrit dans le message de news:
Bonjour. Tu dois mettre : F:Performa graphique entre guillemets, c'est une chaine de caractères. Pourquoi ne pas mettre : A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5" Cordialement. Daniel "garnote" a écrit dans le message de news:
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue dans la cellule d'un autre classeur sans ouvrir celui-ci. Si tu veux récupérer ce contenu, tape directement dans la cellule de destination : ='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12 sans te tromper dans la ponctuation ! *** J'ai essayé ceci ='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5 et ça fonctionne correctement. *** Si tu veux par macro affecter ce contenu à une variable A A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" & Range(Ref).address *** J'ai essayé cela A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 & "'!" & Range("A5").Address TextBox1.Value = A et ça ne fonctionne pas. Excel me surligne le . Pourquoi ? ***
Serge
Pompé sur le site de John Walkenbach :
Sub GetValue()
' Retrieves a value from a closed workbook
Dim arg As String
Chemin = "e:donneesdanielmpfe"
NomFichier = "070102.xls"
Onglet = "Feuil1"
' Create the argument
arg = "'" & Chemin & "[" & NomFichier & "]" & Onglet & "'!" & _
Range("A1").Address(, , xlR1C1)
' Execute an XLM macro
A = ExecuteExcel4Macro(arg)
End Sub
Daniel
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
uR087c1LHHA.3944@TK2MSFTNGP06.phx.gbl...
Avec un ou 2 , ça ne renvoie pas le contenu de la cellule
mais le chemin tel que tu l'as écrit.
Serge
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
ORbcIW1LHHA.3952@TK2MSFTNGP02.phx.gbl...
Erratum, il manque un antislash après graphique :
A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5"
Daniel
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
OjKt0T1LHHA.780@TK2MSFTNGP03.phx.gbl...
Bonjour.
Tu dois mettre : F:Performa graphique entre guillemets, c'est une
chaine de caractères. Pourquoi ne pas mettre :
A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5"
Cordialement.
Daniel
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de
news: OZ5FeE1LHHA.1008@TK2MSFTNGP06.phx.gbl...
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue
dans la cellule d'un autre classeur sans ouvrir celui-ci.
Si tu veux récupérer ce contenu, tape directement dans la cellule de
destination :
='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12
sans te tromper dans la ponctuation !
***
J'ai essayé ceci
='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5
et ça fonctionne correctement.
***
Si tu veux par macro affecter ce contenu à une variable A
A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" &
Range(Ref).address
***
J'ai essayé cela
A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 &
"'!" & Range("A5").Address
TextBox1.Value = A
et ça ne fonctionne pas. Excel me surligne le . Pourquoi ?
***
' Retrieves a value from a closed workbook Dim arg As String Chemin = "e:donneesdanielmpfe" NomFichier = "070102.xls" Onglet = "Feuil1" ' Create the argument arg = "'" & Chemin & "[" & NomFichier & "]" & Onglet & "'!" & _ Range("A1").Address(, , xlR1C1) ' Execute an XLM macro A = ExecuteExcel4Macro(arg) End Sub
Daniel
"garnote" a écrit dans le message de news:
Avec un ou 2 , ça ne renvoie pas le contenu de la cellule mais le chemin tel que tu l'as écrit.
Serge
"Daniel" a écrit dans le message de news:
Erratum, il manque un antislash après graphique : A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5" Daniel "Daniel" a écrit dans le message de news:
Bonjour. Tu dois mettre : F:Performa graphique entre guillemets, c'est une chaine de caractères. Pourquoi ne pas mettre : A = "='F:Performa graphique[MINIMAXIFLEX]Feuil1'!A5" Cordialement. Daniel "garnote" a écrit dans le message de news:
Bonjour,
J'ai consulté cette astuce de GeeDee sur Exclabo :
Comment faire pour affecter à une variable la valeur contenue dans la cellule d'un autre classeur sans ouvrir celui-ci. Si tu veux récupérer ce contenu, tape directement dans la cellule de destination : ='D:MesDocumentsMondossier[Monclasseur.xls]Feuil1'!B12 sans te tromper dans la ponctuation ! *** J'ai essayé ceci ='F:Performa graphique[MINIMAXIFLEX.xls]Feuil1'!A5 et ça fonctionne correctement. *** Si tu veux par macro affecter ce contenu à une variable A A = "='" & Chemin & "[" & NomFic & "]" & Onglet & "'!" & Range(Ref).address *** J'ai essayé cela A = "='" & F:Performa graphique & "[" & MINIMAXIFLEX & "]" & Feuil1 & "'!" & Range("A5").Address TextBox1.Value = A et ça ne fonctionne pas. Excel me surligne le . Pourquoi ? ***