Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Replace into excel
Message
 
À
05/10/2004 15:46:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00948894
Message ID:
00948919
Vues:
17
Then you probably are talking about something similar to this:
ObjExcel= CREATEOBJECT("Excel.Application")
with ObjExcel
     .Workbooks.open(yourfile)
      lcRange="A2"  &&starting cell
      .Range(lcRange).Select
     .Rows(TRANSFORM(.ActiveCell.row)+":"+TRANSFORM(.ActiveSheet.UsedRange.Rows.Count)).Delete  &&remove all data

     use your table
     _VFP.Datatoclip(,,3)
    .ActiveSheet.Paste()
     .........
>hi,
>thank you for reply.
>if i have one sheet and the same fields at vfp table and excel sheet,
>juse i want to keep the all titel as it is at myexcel sheet when i make a copy form vfp table,
>if you can compleat the copy statment[copy to ... XLS] or just somthing
>like (copy file t1.dbf to c:\exel123\gg.xls).
>thanks.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform