Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Record limit in copying to Excel
Message
 
To
13/08/2002 07:53:06
Martin Urbel
Novamed Corporation
Trumbull, Connecticut, United States
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Re: Record limit in copying to Excel
Miscellaneous
Thread ID:
00689052
Message ID:
00692008
Views:
17
Try this:
USE MyTable &&  RECCOUNT("MyTable") > 16384 records !!!
lcDBF = "C:\MyDBF.dbf"
lcXLS = "C:\MyXLS.xls"
COPY TO (lcDBF) TYPE FOX2X AS 850
loExcel = CREATEOBJECT("Excel.Application")
WITH loExcel.Application
  .Workbooks.Open(lcDBF)
  .ActiveWorkbook.SaveAs(lcXLS, -4143, "", "", .F., .F.)
  .Workbooks.Close
ENDWITH
RELEASE loExcel
You can use it for Excel 97 and 2000
By two common phrases in his vocabulary, we know Hercule Poirot was a great Developer: his use of "the little grey cells" and "order and method".
Previous
Reply
Map
View

Click here to load this message in the networking platform