Tengo una hoja en Excel 2010 que extrae datos de QueryTables de una base de datos de Oracle, conectada a través de un DSN de ODBC.

Necesito tomar datos de la hoja de cálculo y usarlos para actualizar una tabla en la misma base de datos de Oracle. No puedo hacer una actualización desde una tabla de consulta, pero ese es el único método de conexión que he podido trabajar con el ODBC.

He intentado configurar una conexión ADODB, pero estoy recibiendo una

'Run-time error '-2147467259 (80004005'):

Automation error
Unspecified error

Aquí está el código que utilicé:

Sub Upload_Click()
    Dim cn As ADODB.Connection
    Set cn = New ADODB.Connection

    With cn
        .Provider = "MSDASQL"
        .ConnectionString = "DSN=xcognosD;"
        .Open
    End With

    cn.Close
End Sub

Nota adicional: estoy en Windows 7 usando un controlador odbc de 64 bits, conectándome a la base de datos Oracle 11.