Discussion :

[progami]

Bonjour,

C'est encore moi

J'ai mon interface en vb.net qui communique avec un fichier EXCEL
je veux modifier toute une colonne

j'ai fait ce code :

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
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Using c As New System.Data.OleDb.OleDbConnection
 
 
            With c
                .ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source=""d:\LocalData\Desktop\test.xlsx"" ; Extended Properties=""Excel 12.0 Xml; IMEX=1"" "
 
                .Open()
 
            End With
 
            Dim i As Integer = 0
            Dim cmd = c.CreateCommand
            cmd.CommandText = "INSERT INTO [Feuil1$A7:A7] VALUES ('texte')"
 
            cmd.ExecuteNonQuery()
 
 
        End Using
    End Sub

mais je me retrouve avec l'erreur :

l'operateur doit utiliser une requete qui peut etre mise a jour
au niveau de la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 cmd.ExecuteNonQuery()

j'ai fait pas mal de recherche sur internet mais rien qui marche
auriez vous une idée ?

Mercii d'avance

[progami]

je l'ai résolu

voila le code :

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
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Using c As New System.Data.OleDb.OleDbConnection
 
 
            With c
                .ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source=""d:\LocalData\a195814\Desktop\testani.xlsx"" ;Mode=ReadWrite; Extended Properties=""Excel 12.0 Xml; HDR=YES"" "
 
                .Open()
 
            End With
 
            Dim i As Integer = 0
            Dim cmd = c.CreateCommand
            cmd.CommandText = "INSERT INTO [Feuil1$A7:A7] VALUES ('hrrry')"
            '  Update [Feuil1$A1:A1] set B1 = New Name
            cmd.ExecuteNonQuery()
 
 
        End Using
    End Sub