Discussion :

[SAP_Excel]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

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

[ProgElecT]

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.

[SAP_Excel]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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