Page 1 of 1
FW_AdoToExcel and sheet
Posted: Tue Sep 28, 2021 7:47 am
by Maurizio
Hello Rao
it is possible with the function FW_AdoToExcel determine in which sheet to export ?
Maurizio
Re: FW_AdoToExcel and sheet
Posted: Tue Sep 28, 2021 12:11 pm
by nageswaragunupudi
FW_AdoToExcel( cSql ) --> oSheet
This function creates a new Excel Book, exports to only sheet available, i.e., "Sheet1" and returns the Sheet object.
You can use the oSheet object and do anything with it, including rename it :
oSheet:Name := "SomeOtherName".
Re: FW_AdoToExcel and sheet
Posted: Tue Sep 28, 2021 12:36 pm
by Maurizio
Thanks Rao
This Works

,
is there a possibility to export more recordest in different Sheets of the same Excel file?
Maurizio
Re: FW_AdoToExcel and sheet
Posted: Wed Sep 29, 2021 9:51 am
by nageswaragunupudi
Code: Select all | Expand
local oExcel, oBook, oSheet
local oCn, oRs, n
oCn := FW_MSSQLDB()
oRs := FW_OpenRecordSet( oCn, "states" )
xbrowser oRs
oExcel := ExcelObj()
oBook := oExcel:WorkBooks:Open( "c:\fwh\tests\testbook.xlsx" )
oSheet := oBook:WorkSheets( "two" )
oSheet:Activate()
oSheet:Cells:Clear()
for n := 1 to oRs:Fields:Count()
oSheet:Cells( 1, n ):Value := oRs:Fields( n - 1 ):Name
next
oSheet:Cells( 2, 1 ):CopyFromRecordSet( oRs )
oRs:Close()
oCn:Close()
oExcel:Visible := .t.
return nil
Re: FW_AdoToExcel and sheet
Posted: Thu Sep 30, 2021 7:08 am
by Maurizio
Thanks Rao