FiveTech Software tech support forums

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

Eugeniusz Owsiak wrote: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

Richard,

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


regards Eugeniusz

Eugeniusz Owsiak wrote: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

Eugeniusz Owsiak wrote: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