Bonjour,
Je dois dire que c'est ma première fois avec Excel et là j'ai un souci. J'ai regardé sur plusieurs posts la manière de faire pour récupérer la valeur d'une cellule dans un fichier excel mais chez moi ca marche pas
Je vous met le code en espèrant que quelqu'un puisse m'aider :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click Dim xlApp As New xls.Application Dim xlWb As xls.Workbook Dim xlSh As xls.Worksheet Dim toto As String xlWb = xlApp.WorkBooks.Open("C:\Documents and Settings\Michael BRUNIAS\Bureau\installation.xls") xlSh = xlWb.WorkSheets(1) toto = xlSh.Cells(1, 2).ToString MsgBox(toto) End Sub
Partager