Help!!!!!
djamal198200
Messages postés
1
Date d'inscription
samedi 1 avril 2006
Statut
Membre
Dernière intervention
1 avril 2006
-
1 avril 2006 à 13:09
jannoman Messages postés 256 Date d'inscription jeudi 17 avril 2003 Statut Membre Dernière intervention 20 février 2008 - 1 avril 2006 à 14:10
jannoman Messages postés 256 Date d'inscription jeudi 17 avril 2003 Statut Membre Dernière intervention 20 février 2008 - 1 avril 2006 à 14:10
1 réponse
jannoman
Messages postés
256
Date d'inscription
jeudi 17 avril 2003
Statut
Membre
Dernière intervention
20 février 2008
1
1 avril 2006 à 14:10
1 avril 2006 à 14:10
apres une tres courte recherche sur le forum ...
dim ex as object
dim text1 as string
'charge Excel
set ex = CreateObjet("Excel.Application")
'ouvre ton doc
ex.Workbooks.Open "TonDoc.xls"
ex.visible = false
appactivate ex.name
text1 = ex.cell(ligne, colonne).value
et apres :
ex.quit
set ex = nothing
A+.
Thomas.
dim ex as object
dim text1 as string
'charge Excel
set ex = CreateObjet("Excel.Application")
'ouvre ton doc
ex.Workbooks.Open "TonDoc.xls"
ex.visible = false
appactivate ex.name
text1 = ex.cell(ligne, colonne).value
et apres :
ex.quit
set ex = nothing
A+.
Thomas.