Creando tablas en Word con VFP a través de Automatización
Visual Fox Pro, Trucos Agregar ComentariosUn ejemplo como podemos crear tablas en Word con datos de tablas de VFP, a través de Automatización.
- USE
employee
lcTemp = SYS(2015)+".txt"
COPY fields empl_id, last_name TO (lcTemp) TYPE csv
- lnFields = 2
- _ClipText = chrtran(FileToStr(lcTemp),["],"")
- erase (lcTemp)
- #define wdSeparateByCommas 2
oWordDocument=createobject("word.application") && Create word object
- WITH oWordDocument
.documents.add
-
WITH .ActiveDocument
.Range.Paste
.Range.ConvertToTable(wdSeparateByCommas,,lnFields)
ENDWITH
-
.visible = .t.
.Activate
ENDWITH
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com