Formulas in exel

[Armando]

Dear friends:

Have a nice day.

I am looking for a small sample to record formulas in a excel sheet using TOLE.

somebody can help me ?

Best regards

[Enrico Maria Giordano]

Code: Select all  Expand view  RUN

oSheet:Cells( nRow, nCol ):Value = "=your formula here"

Note the equal sign.

EMG

[Armando]

Enrico:

Thanks so much, problem solved with your help (as usual)

Now another question !

Is there a way to know the version of excel that is being used ?

I mean, =SUM(), (English language) is not equal to =SUMA() (Spanish language) how to know when to use one and when to use an other one ?.

Best regards

[Enrico Maria Giordano]

First try if the English version works in Spanish version too, at least using OLE.

EMG

[Armando]

Enrico:

Thanks for your replay.

In Spanish versión does not work a formula in English language

=SUM() <> =SUMA()

Regards

[Enrico Maria Giordano]

Code: Select all  Expand view  RUN

#define msoLanguageIDInstall 1
#define msoLanguageIDUI      2
#define msoLanguageIDHelp    3


FUNCTION MAIN()

    LOCAL oExcel := CREATEOBJECT( "Excel.Application" )

    LOCAL oApp := oExcel:CommandBars( "Standard" ):Application

    ? oApp:LanguageSettings:LanguageID( msoLanguageIDInstall )
    ? oApp:LanguageSettings:LanguageID( msoLanguageIDUI )
    ? oApp:LanguageSettings:LanguageID( msoLanguageIDHelp )

    ? oExcel:LanguageSettings:LanguageID( msoLanguageIDInstall )

    INKEY( 0 )

    RETURN NIL

EMG

[Armando]

Thank you Mr. Enrico:

I'll try

Best regards