Ciao ragazzi,
sto cercando di salvare dei dati con una connessione ADO su un file Excel, il codice che uso e' il seguente:
codice:
Private Sub testExcel_Click()
    Dim strSQL  As String, conStr As String
    Dim cnn As New ADODB.Connection
    Dim RS As New ADODB.Recordset
    Dim A As Integer
    Dim DBPath As String
    
    DBPath = "W:\prestitalia\test-tavoli\controlli_annullate_2017_11_20.xlsx"  'Refering the sameworkbook as Data Source
    conStr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='" & DBPath & "';" & _
                 "Extended Properties=""Excel 12.0;HDR=YES;IMEX=1;"";"
 '************************* SCRITTURA FILE EXCEL
    strSQL = "INSERT INTO [SFoglio1] VALUES('VA', 'On', 'Computers', 'Mid', 30)"
    strSQL = "Insert Into [Foglio1$] (ID,Name,Amt) Values(1,'Bob',3.10)"
    strSQL = "INSERT INTO [Foglio1$] (pratica) VALUES (111)"
    cnn.Open conStr
    cnn.Execute strSQL
    
    cnn.Close
    Set cnn = Nothing
End Sub
ma si blocca sull'execute dandomi il seguente errore:

Errore di run-time '-2147467259 (80004005)':Per l'operazione è necessaria una query aggiornabile

Ho anche provato ad inserire ReadOnly=0 nelle extended property della connessione ma non cambia nulla, mi sapete aiutare?