ouverture d'un classeur dont son nom se trouve dans une cellule

s'il vous plait je suis nouveau , et je veux savoir le code pour ouvrir , apartir d'une commande , un classeur dont son nom se trouve dans la cellule A1. s'il veux plais ne penser pas au lien hypertex.

salutations

Bonjour Mosta2010,

Exemple (si le fichier se trouve sur le même répertoire que le fichier déjà ouvert) :

Code:

---

1 2	mfich = Range("A1").Value Workbooks.Open (mfich)

---

sinon :

Code:

---

1 2 3

mfich = Range("A1").Value mpath = "C:\Rep1\rep2" Workbooks.Open (mpath & mfich)

---

monseur jacques_jean

quand j'éxécute le deuxième code le message suivant s'affiche
erreur d'xecution "1004"
"C:\Rep1\rep2mfch.xls" introuvable. verifier l'ortographe du nom du classeur et la validité de l'emplacement.

ci-joint le fichier d'esseye

merci de me résoudre ce problème

salutations
mosta2010

ci-après le fichier source

merci

Bonjour Mosta2010,

Autant pour moi j'ai oublié un séparateur :

Code:

---

1 2 3 4 5

mpath = "C:\Rep1\rep2\"   et non   mpath = "C:\Rep1\rep2"

---

Bien évidemment le répertoire et sous-répertoire ne sont qu'un exemple.

Amicalement.

Re,

Je viens de voir que sur le fichier source non seulement la cellule "A1" contient le nom du fichier à ouvrir mais aussi la cellule "C1" contient le nom de la feuille à sélectionner. Donc pour intégrer cela dans le code :

Code:

---

1 2 3 4 5

mfich = Range("A1").Value nfeuil = Range("C1").Value mpath = "C:\Rep1\rep2\" Workbooks.Open (mpath & mfich) Sheets(nfeuil).Select

---