OVH Cloud OVH Cloud

ouvrir un classeur à partir d'un autre en macro

11 réponses
Avatar
kared
bonjour

je souhaite =E0 partir d'un classeur ouvrir un autre
classeur qui se trouve dans le m=EAme repertoire quel que=20
soit ce repertoire.

j'ai tent=E9 avec le nom du classeur uniquemant mais ca ne=20
fonctionne pas.
Workbooks.Open Filename:=3D("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne=20
connais pas cette fonction

merci d'avance=20

10 réponses

1 2
Avatar
papou
Bonjour
Workbooks.Open Filename:=(ThisWorkbook.Path & application.PathSeparator &
"Sales.xls")
Cordialement
Pascal

"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance
Avatar
Joel
Bonjour,

ce doit être kekchoz du genre :
Workbooks.Open Filename:=(ActiveWorkbook.Path & "Sales.xls")

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance
Avatar
papou
Heu d'ailleurs tant que nous y sommes ;-)
Workbooks.Open (ThisWorkbook.Path & application.PathSeparator & "Sales.xls")
Cordialement
Pascal

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Cordialement
Pascal


"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance





Avatar
Jacky
Bonjour Kared

Chemin= "c:mon dossier" 'a adapter
Workbooks.Open FileName:=chemin &"Sales.xls"

Salutations
JJ

"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance
Avatar
Joel
Bonjour Jacky

Attention, il y a un "" en trop

;-)

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacky" a écrit dans le message
de news:%
Bonjour Kared

Chemin= "c:mon dossier" 'a adapter
Workbooks.Open FileName:=chemin &"Sales.xls"

Salutations
JJ

"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance




Avatar
Jacky
exacte, donc
&"Sales.xls"
merci d'avoir rectifié

JJ

"Joel" a écrit dans le message de
news:41541c05$0$754$
Bonjour Jacky

Attention, il y a un "" en trop

;-)

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacky" a écrit dans le message
de news:%
Bonjour Kared

Chemin= "c:mon dossier" 'a adapter
Workbooks.Open FileName:=chemin &"Sales.xls"

Salutations
JJ

"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance








Avatar
papou
Heu !!
Workbooks.Open ThisWorkbook.Path & application.PathSeparator & "Sales.xls"
Il est temps que le week-end arrive ;-)

Cordialement
Pascal

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:
Heu d'ailleurs tant que nous y sommes ;-)
Workbooks.Open (ThisWorkbook.Path & application.PathSeparator &
"Sales.xls")

Cordialement
Pascal

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:
Bonjour
Cordialement
Pascal


"kared" a écrit dans le message de
news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance









Avatar
merci beaucoup ca marche
-----Message d'origine-----
Bonjour,

ce doit être kekchoz du genre :
Workbooks.Open Filename:=(ActiveWorkbook.Path
& "Sales.xls")


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"kared" a écrit
dans le message de

news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance


.



Avatar
merci on m'a donné une soluce acec application.path qui
me conviens tres bien

j'avais pencé à ceci mais je voulais pouvoir mettre ces
deux fichiers n'importe ou sur le disque et pouvoir
lancer la macro sans avoir à la retoucher.
merci quand même

-----Message d'origine-----
exacte, donc
&"Sales.xls"
merci d'avoir rectifié

JJ

"Joel" a écrit dans le message de
news:41541c05$0$754$
Bonjour Jacky

Attention, il y a un "" en trop

;-)

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacky" a
écrit dans le message


de news:%
Bonjour Kared

Chemin= "c:mon dossier" 'a adapter
Workbooks.Open FileName:=chemin &"Sales.xls"

Salutations
JJ

"kared" a
écrit dans le message de



news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel
que



soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais
ca ne



fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais
je ne



connais pas cette fonction

merci d'avance








.





Avatar
solution retenue
merci beaucoup

-----Message d'origine-----
Bonjour
Workbooks.Open Filename:=(ThisWorkbook.Path &
application.PathSeparator &

"Sales.xls")
Cordialement
Pascal

"kared" a écrit
dans le message de

news:2f3b01c4a234$6cc7d090$
bonjour

je souhaite à partir d'un classeur ouvrir un autre
classeur qui se trouve dans le même repertoire quel que
soit ce repertoire.

j'ai tenté avec le nom du classeur uniquemant mais ca ne
fonctionne pas.
Workbooks.Open Filename:=("Sales.xls")

il y a peut etre une solution avec filesystem mais je ne
connais pas cette fonction

merci d'avance


.



1 2