Hola a todos,

Estoy intantando usar Excel desde mi aplicación y me encuentro con este error:

---

Error description: (DOS Error -2147352570) WINOLE/1009 No existe el m‚todo: GET
Args:
[ 1] = C ActiveSheet

Stack Calls

Called from: => TOLEAUTO:GET(0)
Called from: c:\desarrol\treball\Ampa1110\prg\DBFXLS7A.PRG => DBFXLS712007(330)
...

---

El código és el siguiente:

---

    TRY
        oExcel   := CreateObject( "Excel.Application" )
    CATCH
            MsgAlert( "Excel not installed" )
            Return Nil
    END

    oBook   := oExcel:WorkBooks:Add()

oHoja   := oExcel:Get( "ActiveSheet" )

---

El caso es que con la versión FWH9.03 funciona sin problemas; que es lo que no he actualizado en la versión FWH10.09 que uso ahora?

He mirado el .BAT que trae de ejemplo para ver si hay alguna .LIB diferente a las que estoy compilando, y todo parece correcto.
Lo estoy haciendo sobre un XP y con el Excel 2003.

A ver si alguién me puede orientar sobre el problema.

Gracias.

Carlos,

Prueba a cambiar:

oHoja := oExcel:Get( "ActiveSheet" )

por:

oHoja := oExcel:ActiveSheet

Antonio Linares wrote:Carlos,

Prueba a cambiar:

oHoja := oExcel:Get( "ActiveSheet" )

por:

oHoja := oExcel:ActiveSheet

Gracias, esta noche lo pruebo.

Antonio Linares wrote:Carlos,

Prueba a cambiar:

oHoja := oExcel:Get( "ActiveSheet" )

por:

oHoja := oExcel:ActiveSheet

Gracias Antonio, funcionó perfectamente.

Además he tenido que cambiar el uso de:
oHoja:Set( "loquesea", elvalor )
por:
oHoja:loquesea := elvalor

En fin que ahora parece que ya todo vuelve a funcionar.

Gracias.