Fwd: [usuarios_fox] report a excel

---------- Forwarded message ----------
From: eduardo martinez <eduardo862005@yahoo.com.ar>
Date: 2009/5/18
Subject: Re: [usuarios_fox] report a excel
To: usuarios_fox@yahoogrupos.com.mx

LOCAL Fila
WAIT'Espere Un Momento Exportando Datos' WINDOW NOWAIT
_SCREEN.MOUSEPOINTER=14
TmpSheet=GETOBJECT('','Excel.Sheet')
XLApp=TmpSheet.APPLICATION
XLApp.VISIBLE=.T.
XLApp.workbooks.ADD()
XLSheet=XLApp.ActiveSheet
XLSheet.Cells(2,2)="Id Prest."
XLSheet.Cells(2,2).FONT.bold=.T.
XLSheet.Cells(2,2).FONT.SIZE="12"
XLSheet.Cells(2,2).FONT.NAME="Arial"
XLSheet.Cells(2,3)="Prestador"
XLSheet.Cells(2,3).FONT.bold=.T.
XLSheet.Cells(2,3).FONT.SIZE="12"
XLSheet.Cells(2,3).FONT.NAME="Arial"
XLSheet.Cells(2,4)="Matricula"
XLSheet.Cells(2,4).FONT.bold=.T.
XLSheet.Cells(2,4).FONT.SIZE="12"
XLSheet.Cells(2,4).FONT.NAME="Arial"
XLSheet.Cells(2,5)="Debito"
XLSheet.Cells(2,5).FONT.bold=.T.
XLSheet.Cells(2,5).FONT.SIZE="12"
XLSheet.Cells(2,5).FONT.NAME="Arial"
XLSheet.Cells(2,6)="ExtraCapita"
XLSheet.Cells(2,6).FONT.bold=.T.
XLSheet.Cells(2,6).FONT.SIZE="12"
XLSheet.Cells(2,6).FONT.NAME="Arial"
XLSheet.Cells(2,7)="Autorizado"
XLSheet.Cells(2,7).FONT.bold=.T.
XLSheet.Cells(2,7).FONT.SIZE="12"
XLSheet.Cells(2,7).FONT.NAME="Arial"
XLSheet.Cells(2,8)="Total"
XLSheet.Cells(2,8).FONT.bold=.T.
XLSheet.Cells(2,8).FONT.SIZE="12"
XLSheet.Cells(2,8).FONT.NAME="Arial"
SELE CURORD
Fila=3
SCAN
 XLSheet.Cells(Fila,2)=Pre_Id
 XLSheet.Cells(Fila,3)=Prestador
 XLSheet.Cells(Fila,4)=Matricula
 XLSheet.Cells(Fila,5)=Debito
 XLSheet.Cells(Fila,6)=ExtraCapita
 XLSheet.Cells(Fila,7)=Autorizado
 XLSheet.Cells(Fila,8)=Total
 Fila=Fila+1
ENDSCAN
XLSheet.COLUMNS("A:A").COLUMNWIDTH = 2
XLSheet.COLUMNS("B:B").EntireColumn.AutoFit
XLSheet.COLUMNS("C:C").EntireColumn.AutoFit
XLSheet.COLUMNS("D:D").EntireColumn.AutoFit
XLSheet.COLUMNS("E:E").EntireColumn.AutoFit
XLSheet.COLUMNS("F:F").EntireColumn.AutoFit
XLSheet.COLUMNS("G:G").EntireColumn.AutoFit
_SCREEN.MOUSEPOINTER=0

--- El dom 17-may-09, horacio villegas <horville@yahoo.com> escribió:

De: horacio villegas <horville@yahoo.com>
Asunto: [usuarios_fox] report a excel
Para: usuarios_fox@yahoogrupos.com.mx
Fecha: domingo, 17 de mayo de 2009, 11:32 pm

Hola a todos.

Queremos ver si es posible por medio de un report de vfox que la
salida la deje en una hoja de excel.

trabajamos vfp 6, no se si en el 8 o el 9 se pueda o si por medio de
alguna otra herramientra.

Gracias y Saludos.

Horacio

Yahoo! Cocina
Recetas prácticas y comida saludable
http://ar.mujer.yahoo.com/cocina/

[Se han eliminado los trozos de este mensaje que no contenían texto]

__._,_.___
Mensajes con este tema (3) Responder (mediante la Web) | Crear un tema nuevo
Mensajes
Comentarios, observaciones o si deseas darte de baja avísame a:
jamorquecho@hotmail.com

Modificar la configuración mediante la Web (ID de Yahoo! obligatoria)
Modificar la configuración mediante el correo: Cambiar a resumen
diario | Cambiar el formato a Tradicional
Visita tu grupo | Condiciones de uso de Yahoo! Grupos | Cancelar suscripción
Actividad reciente

Visita tu grupo
Y! Respuestas

Pregunta

Gente real te

responde

Yahoo! Messenger

Mensajero perfecto

Llama de PC a PC

sin costo alguno

Barra Yahoo!

Todo a un clic

Acceso rápido a

servicios Yahoo!

.
__,_._,___