appeler un classeur avec une macro

Bonjour

Tu peux utiliser le code suivant, qui enregistre dans deux variables les
données des plages B2 et B3, puis qui les utilisent pour ouvrir le classeur
voulu sur la feuille désirée...

Il faut utiliser des variables car une fois le classeur souahité ouvert,
c'est lui qui devient actif et une référence à des cellules se feraient dans
ce classeur et non dans le classeur appelant...

Sub Test()
Dim NomClasseur As String
Dim NomFeuille As String

NomClasseur = Range("b2")
NomFeuille = Range("b3")
Workbooks.Open ThisWorkbook.Path & "" & NomClasseur & ".xls"
ActiveWorkbook.Worksheets(NomFeuille).Select
End Sub

Ok?


--
Pierre Fauconnier (pierre.fauconnier@nospam.nospam)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"alain" <alain.nospam.rambot@wanadoo.fr> a écrit dans le message de news:
43ea1bec$0$6659$8fcfb975@news.wanadoo.fr...

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur non
ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

Bonsoir,
Ceci peut être:
En adaptant le chemin..
'-----------
Sub jj()
x = [b3]
Workbooks.Open FileName:="C:rep1" & [b2]
Sheets(x).Select
end sub
'----------
Salutations
JJ


"alain" <alain.nospam.rambot@wanadoo.fr> a écrit dans le message de
news:43ea1bec$0$6659$8fcfb975@news.wanadoo.fr...

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur
non ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

bonjour,

Dans quel répertoire se trouve tes classeurs à ouvrir ?

La macro peut ouvrir un fichier si on dispose du chemin. Ce chemin peut
aussi être généré (ex : répertoire courant & texte de cellule & xls)

Bon courage.

Philippe.

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur
non ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

bonjour,

Dans quel répertoire se trouve tes classeurs à ouvrir ?

La macro peut ouvrir un fichier si on dispose du chemin. Ce chemin peut
aussi être généré (ex : répertoire courant & texte de cellule & xls)

Bon courage.

Philippe.

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur
non ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

Le répertoire est c:compta

RE....

-----------
Sub jj()
x = [b3]
Workbooks.Open FileName:="c:compta" & [b2] &".xls"
Sheets(x).Select
end sub
'----------
Le code de Pierre ne convient pas ??

Salutations
JJ

"alain" <alain.nospam.rambot@wanadoo.fr> a écrit dans le message de news:
43ea37ae$0$19683$8fcfb975@news.wanadoo.fr...

bonjour,

Dans quel répertoire se trouve tes classeurs à ouvrir ?

La macro peut ouvrir un fichier si on dispose du chemin. Ce chemin peut
aussi être généré (ex : répertoire courant & texte de cellule & xls)

Bon courage.

Philippe.

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur
non ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

Le répertoire est c:compta

Merci à tous.
j'ai testé les différentes solutions proposées qui fonctionnent parfaitement

RE....

-----------
Sub jj()
x = [b3]
Workbooks.Open FileName:="c:compta" & [b2] &".xls"
Sheets(x).Select
end sub
'----------
Le code de Pierre ne convient pas ??

Salutations
JJ

"alain" <alain.nospam.rambot@wanadoo.fr> a écrit dans le message de news:
43ea37ae$0$19683$8fcfb975@news.wanadoo.fr...

bonjour,

Dans quel répertoire se trouve tes classeurs à ouvrir ?

La macro peut ouvrir un fichier si on dispose du chemin. Ce chemin peut
aussi être généré (ex : répertoire courant & texte de cellule & xls)

Bon courage.

Philippe.

Bonjour

Je rentre dans une cellule de ma feuille courante le nom d'un classeur
non ouvert et le nom de la feuille ex : en B2 ---> "Devis06" en B3 --->
"JANVIER"
Je souhaite une macro qui ouvre le classeur Devis06 et se positionne sur
la feuille JANVIER.

Merci de votre aide

Alain

Le répertoire est c:compta