Update ein excel-Blatt mit VBA/ADO

Wenn ich diese Funktion ausführen bekomme ich einen Laufzeitfehler, "Operation muss eine aktualisierbare Abfrage verwenden". Was verursacht es?

Function updateConfigFile(strQuery As String)

Dim cnn As ADODB.Connection         
Dim objMyCmd As ADODB.Command

Set cnn = New ADODB.Connection
Set objMyCmd = New ADODB.Command

constConfigFile = "MyWorkbookName"

With cnn

    .Provider = "Microsoft.Jet.OLEDB.4.0"
    .ConnectionString = "Data Source=" & ActiveWorkbook.Path & constConfigFile & ";" & _
        "Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"
    .Open

End With

strQuery = "update [test$] Set [test]='Hello' WHERE [Test]='h'"

objMyCmd.CommandType = adCmdText
objMyCmd.CommandText = strQuery
objMyCmd.ActiveConnection = cnn

objMyCmd.Execute


Set objMyCmd = Nothing
Set cnn = Nothing


End Function
  • Was bedeutet constConfigFile Aussehen? Könnte es sein, fehlende Datei-Schreibrechte auf die Datei?
InformationsquelleAutor vkrams | 2012-08-17
Schreibe einen Kommentar