insert xls-records into oracle-db using ODBC in VBA

I'm able to query the oracle-DB from within xls-VBA using
QueryTables.Add

But I don't know, how to create an "insert" using this ODBC-connection in VBA.
The SQL-syntax is correct, as I can use the string in sql-plus successfully to insert the record into the oracle-DB.

Any example-code available?

thx
witty
LVL 1
wittyAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
amdefactoConnect With a Mentor Commented:
Try the code below...
The .Refresh has to be set to True. It will not work with a False.

-----------
Sub SQLInsert()
    Selection.ClearContents  'If you don't do this after the first running of this sub, there will be an extra column added before the destination column
    SQLstring = "insert into EMPLOYEES (FirstName) values ('Test')"
    conn = '<Your ODBC Conn  String>
    With ActiveSheet.QueryTables _
        .Add(Connection:=conn, Destination:=Range("A20"), Sql:=SQLstring)
        .Refresh BackgroundQuery:=True  'It can't be set to FALSE for an insert.
    End With
End Sub


0
All Courses

From novice to tech pro — start learning today.