[vb.net] navigation sur une feuille excel
Déké
-
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je suis un étudidant en programmation et je suis actuellement en stage, je rencontre un petit problème pour piloté excel avec vb.net
J'essaye de me placer dans la 1er feuille du fichier que j'ai ouvert mais le problème c'est que je rencontre des erreur. ( je voudrais ensuite placer les donnée dans mon tableau sous vb.net )
pour résumer je cherche bien ouvrir mon fichier pour pouvoir manipuler les informations.
Voici mon code:
Private Sub ValiderCfacture_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ValiderCfacture_Button.Click
Dim oBook As Excel.Workbook
Dim oSheets As Excel.Worksheet
Dim tabExcel(5000, 5000) As Single
Dim xl As New Excel.Application
xl = New xls.Application
oBook = xl.Workbooks.Open(Nomfile)
xl.Visible = True
oSheets = oBook.Worksheet(1) 'voila la ligne concerner
For i = 1 To 5000
tabExcel(i, i) = oSheets.Cells(i, i).Value
Next
MsgBox("" & tabExcel(1, 1) & "")
Le membre public 'Worksheet' du type 'Workbook' est introuvable. alors que j'ai fait les référence necessaire ( du moins je pense )
Merci pour l'aide :(
Je suis un étudidant en programmation et je suis actuellement en stage, je rencontre un petit problème pour piloté excel avec vb.net
J'essaye de me placer dans la 1er feuille du fichier que j'ai ouvert mais le problème c'est que je rencontre des erreur. ( je voudrais ensuite placer les donnée dans mon tableau sous vb.net )
pour résumer je cherche bien ouvrir mon fichier pour pouvoir manipuler les informations.
Voici mon code:
Private Sub ValiderCfacture_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ValiderCfacture_Button.Click
Dim oBook As Excel.Workbook
Dim oSheets As Excel.Worksheet
Dim tabExcel(5000, 5000) As Single
Dim xl As New Excel.Application
xl = New xls.Application
oBook = xl.Workbooks.Open(Nomfile)
xl.Visible = True
oSheets = oBook.Worksheet(1) 'voila la ligne concerner
For i = 1 To 5000
tabExcel(i, i) = oSheets.Cells(i, i).Value
Next
MsgBox("" & tabExcel(1, 1) & "")
Le membre public 'Worksheet' du type 'Workbook' est introuvable. alors que j'ai fait les référence necessaire ( du moins je pense )
Merci pour l'aide :(
A voir également:
- [vb.net] navigation sur une feuille excel
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Navigation privée - Guide
- Déplacer une colonne excel - Guide
- Word et excel gratuit - Guide
3 réponses
Bonjour,
c'est tout à fait normal parce qu'obook est égal au fichier que tu veux ouvrir qui se trouve à l'adresse nom file :
oBook = xl.Workbooks.Open(Nomfile)
il faut que tu remplaces cette ligne par quelque chose comme :
oBook = xl.Workbooks.Open("C:\bureau\Classeur1.xls")
Ta macro marchera un peu mieux!
c'est tout à fait normal parce qu'obook est égal au fichier que tu veux ouvrir qui se trouve à l'adresse nom file :
oBook = xl.Workbooks.Open(Nomfile)
il faut que tu remplaces cette ligne par quelque chose comme :
oBook = xl.Workbooks.Open("C:\bureau\Classeur1.xls")
Ta macro marchera un peu mieux!
