Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Save Excel worksheet as text from VFP
Message
De
09/05/2001 05:21:58
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
08/05/2001 17:02:14
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00505014
Message ID:
00505171
Vues:
24
>I need to create a comma delimited text file from an Excel 97 spreadsheet using OLE Automation in VFP. I can't seem to find an example of how to do this.
>
>I know enough to instantiate Excel and open the workbook and navigate to the worksheet using the Excel object but how do I find the command to Save As comma delimited? Something like oWs.SaveAs("Myfile.txt",42) where 42 is the arbitrary number denoting the file type.
>
>Documentation is sparse. Thanks for your help!
>
>-JT
#Define xlCSV  6
#Define xlCSVMac  22
#Define xlCSVMSDOS  24
oExcel = createobject("Excel.application")
With oExcel
  .Workbooks.open(Getfile('XLS'))
  With .ActiveWorkbook
    .Activesheet.SaveAs(sys(5)+curdir()+"myExcelCSV.txt",xlCSV)
    .Saved = .t.
  Endwith
  .Quit
Endwith
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform