>>>Is it possible to get pagewise totals in Excel ??
>>>
>>>Any ideas/suggestions...
>>>
>>>TIA...
>>Vinod,
>>Take a look at subtotal method. Also there is sample code about it today title "....array...excel..".
>>Cetin
>
>I found that thread, Thnks for the tip and code...
>
>Only one question... How we can select a particular page.. i.e. How we can come to know where page ends (i want to automate this thing from vfp...)
>
>Pls advs...
Vinod,
I hope this helps as a starter :
#include "xlConstants.h"
USE home()+"samples\data\customer"
Application.datatoclip("customer",reccount(),3)
PUBLIC oExcel
oExcel = createobject("Excel.application")
Clear
WITH oExcel
.WorkBooks.Add
WITH .ActiveSheet
.Range("D20").select
.Paste
lcLastCell = .Range("A1").SpecialCells(xlLastCell).Address(.f.,.f.,xlA1)
? lcLastCell
.Range("A1").SpecialCells(xlLastCell).Select
.Application.Selection.Offset(1).Select
ENDWITH
.visible = .t.
ENDWITH
Cetin