FoxPro/Visual FoxPro - Tablas Dinámicas

Buenas Tardes

Quisiera saber como hago lo siguiente :

Tengo un cursor que genero para un reporte y tambien lo exporto a excel, pero quisiera saber si se puede generar una Tabla dinámica en ese mismo momento con el VFP

Gracias

César Augusto

Tu pregunta esta un poco ambigua, a que te refieres con tabla dinamicas? Por ejemplo, desde tu app o cualquier programa se podria
crea una tabla en cualquier momento, y segun ciertas propiedades,
esta tbla seria libre o se añadiria al dbc actual, solo ocuparias el
comando CREATE TABLE. Pero supongo a que no te referias a lo
anteriormente mencionado.

Yo quiero crear una tabla dinamica en excel pero desde el VFP, no se si medjo entender

Gracias

yo tambien quiero hacer lo mismo, tengo un reporte desde foxpro, y también un botón que me exporta a excel, pero quiero crear un excel dinámico , con filtros para que sea rápido de manipular y buscar data

*- En el entendimiento de que ya tienes tu cursor hecho haz lo siguiente (no recuerdo donde lo obtuve) -*

LOCAL laPagina(1), laFilas(1), laColumnas(1), lnI, lnReg, lcRango, lcArchivo, loExcel
COPY TO c:\connector\temporal TYPE fox2
lnReg = RECCOUNT()
lcRango="A1:J"+ALLTRIM(STR(lnReg+1))
lcArchivo= "c:\connector\temporal.dbf"
laPagina(1)="fecha"
laFilas(1)="txt_detall"
laColumnas="txt_maestr"
loExcel=CREATEOBJECT("Excel.application")
WITH loExcel.APPLICATION
.VISIBLE = .F.
.workbooks.OPEN(lcArchivo)
.Cells.SELECT
.SELECTION.COLUMNS.AutoFit
.RANGE("A1").SELECT
.ActiveSheet.PivotTableWizard(1,lcRango,"","MiTablaDinamica")
.ActiveSheet.PivotTables("MiTablaDinamica").AddFields(@laFilas, @laColumnas, @laPagina)
.ActiveSheet.PivotTables("MiTablaDinamica").PivotFields("contador").ORIENTATION = 4
.Cells.SELECT
.SELECTION.COLUMNS.AutoFit
.Sheets("Hoja1").NAME = "Reporte"
.RANGE("A3").SELECT
.VISIBLE = .T.
ENDWITH
RELE loExcel