Bonjour,

J'essai depuis quelque temps de lire des cellules ds une feuille Excel, mais rien ne marche. J'ai toujours "System.__ComObject" qui s'affiche ds mon textbox a la place du contenu de ma cellule.
Voici le code que j'utilise:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Imports System
Imports System.Data
Imports System.Web
Imports System.IO
Imports Microsoft.Office.Interop
Imports System.Data.Common
Imports System.Resources
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim xlapp As Object 
 xlapp = CreateObject("excel.application")
 xlapp.application.Workbooks.Open(FileName:="y:\classeur1.xls")
 xlapp.application.Visible = True
 TextBox1.Text = xlapp.application.cells(4, 3).ToString()
Où est le probleme ?
Merci d'avance.