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了.
本文提供了一个使用VBA代码操作Excel文件的具体案例,包括打开指定的Excel文件、修改单元格内容、设置单元格格式并将其另存为DBF文件的全过程。读者可以了解如何通过录制宏获取VBA代码,适用于任何语言调用Excel的场景。

394

被折叠的 条评论
为什么被折叠?



