VFP程序调用EXCEL设置(部份VBA)

EXCEL=CREATEOBJECT('EXCEL.APPLICATION')
EXCEL.WorkBooks.Open("d:/aa.xls")           
Excel.ActiveSheet.UsedRange.Select              &&已用的区域
Excel.Selection.NumberFormatLocal="0.00"   &&设置单元格属性
Excel.Selection.Cells(1,1)="JJE_F"                  &&更改单元格内容
Excel.Selection.Cells(1,2)="CJE_F"
EFile="d:/Sou1.DBF"
EXCEL.ActiveWorkbook.SaveAs(EFile,8)         &&保存为DBF
EXCEL.ActiveWorkbook.saved=.t.
EXCEL.Workbooks.close
EXCEL.quit
Excel=null
USE d:/sou1.dbf SHARED

 

 

不清楚的VBA代码可以通过录制宏来查看VBA代码,任何语言调用EXCEL都一样,只要创建一个EXCEL的对象就可以调用其VBA了.