31/10/2008, 08:29
|
| | | Fecha de Ingreso: octubre-2008
Mensajes: 16
Antigüedad: 15 años, 6 meses Puntos: 0 | |
| Respuesta: error de sistema en excel
El error aparece justo cuando abre el recorset, en la instruccion
Set rs_Record = New ADODB.Recordset
Set rs_Record.ActiveConnection = SQL_conexion
rs_Record.CursorType = adOpenKeyset
s_SQL = "select sum([Amount]) from [ventas$] where [Segment] = 'SE' and [Quarter] = 'Q1'"
rs_Record.Open s_SQL <------ AQUI
Range("D14").FormulaR1C1 = rs_Record(0)
rs_Record.Close
El resto de la macro es muy similar. |