OLE file name

[Eugeniusz Owsiak]

Hallo
How can I get name of opened thru OLE xls file?

....
oExcel := TOleAuto():New( "Excel.Application" )
oExcel:WorkBooks:Open(cGetFile("*.XLS", "Select Excel File"))
//msginfo(oExcel:WorkBooks:FileName())
...

Regards Eugeniusz

[Richard Chidiak]

Hallo
How can I get name of opened thru OLE xls file?

....
oExcel := TOleAuto():New( "Excel.Application" )
oExcel:WorkBooks:Open(cGetFile("*.XLS", "Select Excel File"))
//msginfo(oExcel:WorkBooks:FileName())
...

Regards Eugeniusz

Try it this way

CFILE := cgetfile32("*.xls", "Sélectionnez le fichier",1,ALLTRIM(BDEF->CHEMIN))

oExcel:WorkBooks:Open( CFILE )

Richard

[Eugeniusz Owsiak]

Richard,

I think it is a good and simple solution but where can I found info of oExcel object property?


regards Eugeniusz

[Richard Chidiak]

Richard,

I think it is a good and simple solution but where can I found info of oExcel object property?


regards Eugeniusz

Eugeniusz

Sorry i do not understand the question

What exactly are you looking for ? Active sheet ?

If so try

oSheet = oExcel:Get( "ActiveSheet" )
nRows := oSheet:UsedRange:Rows:Count()
nCols := oSheet:UsedRange:Columns:Count()


Richard

[Enrico Maria Giordano]

Richard,

I think it is a good and simple solution but where can I found info of oExcel object property?


regards Eugeniusz

Search for VBA*.CHM in your hard disk.

EMG