Bonjour à tous,

Étant débutant sur VB.net après 3 jours de combat intensif entre google qui et notre ami et developpez.com, j'ai réussi a attaché mon code afin que mon textbox redonne la valeur chiffre de ma cellule excel.

Je me retrouve un peu dans l'impasse car il m'ouvre bien mon excel, redonne la valeur, mais lorsque j'écris une valeur dans celle ci et que je ferme il n'enregistre pas ma valeur et mon programme ne tue pas tout les excel que j'ouvre à chaque fois.

donc voici mes deux question:

1: mon code lit il bien et ecrit t'il bien sur la feuille excel.
2: comment tué et nettoyé excel lancé en arrière plan.

Merci d'avance.
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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
Imports Excel = Microsoft.Office.Interop.Excel
 
 
Public Class Form1
    Dim xlApp As New Excel.Application
    Dim xlWorkBook As Excel.Workbook
    Dim xlWorkSheet As Excel.Worksheet
 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        xlWorkBook = xlApp.Workbooks.Open("D:\DG")
        TextBox1.Text = xlWorkBook.Sheets("exemple").Range("D2").Value()
    End Sub
 
 
    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        xlWorkBook = xlApp.Workbooks.Open("D:\DG")
        TextBox1 = xlWorkSheet.Sheets("exemple").Range("D2").Value()
        xlApp.close()
    End Sub
 
 
    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
        xlWorkBook = xlApp.Workbooks.Open("D:\DG")
        TextBox1 = xlWorkSheet.Sheets("exemple").Range("D2").Value()
        Me.Close()
 
    End Sub
End Class