Variable VBS à partir d'une valeur de cellule

Bonjour à tous,
Je sèche un peu sur une partie relativement simple de VBS, la déclaration de variable.
J'aimerai que ma variable prenne la valeur d'une cellule provenant d'un fichier Excel.
J'ai pensé à une structure comme ci-dessous mais cela ne marche pas comme VBA... :S

Code:

---

1 2 3 4

Dim variable variable=Workbooks("Monfichier.xlsx").sheets("maFeuil").Cells(1,1) msgbox variable

---

Si quelqu'un peut m'aider ... :D
.Merci d'avance

Salut

Avec ce lien Comment piloter Excel pour créer un classeur.xls ? et le fait que tu as semble t'il la maitrise de VBA Excel, tu devrais pouvoir solutionner ton problème.

ProgElecT ,
Merci pour l'aide, je ne l'avais pas trouvé celle-ci.
En plus super claire.
voici le code

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

dim xlApp, xlBook, xlSht dim filename, value1 filename = "Mon_fichier.xlsx" set xlApp = CreateObject("Excel.Application") set xlBook = xlApp.WorkBooks.Open(filename) set xlSht = xlApp.activesheet value1 = xlSht.Cells(1, 1)   msgbox value1 xlBook.Close False xlApp.Quit set xlSht = Nothing Set xlBook = Nothing Set xlApp = Nothing

---

Bien sur je m'en sers pour autre chose après :D