大家谁知道怎么往一个已经存在并含有格式的EXCEL写文件？

[jerry_huang]

我到网上找资料，只看到用VFP新建一个EXCEL文件，并且在新建的时间设置格式，找不到往一个已经存在并含有格式的EXCEL文件里写数据的方法，请问VFP可以实现这个功能吗？

谢谢！

[millsyys]

可以啊，但是你给的分太少了

[philozz]

以下代码供参考
excelole=CREATEOBJECT("Excel.application")
excelole.visible=.t.
excelole.Workbooks.add
excelole.Worksheets("sheet1").Activate
excelole.Workbooks.Open(″c:\temp\ll.xls″)

XLSheet = excelole.ActiveSheet
FOR I=1 TO NTORF
XLSheet.Cells(1,I).Value = arrTestdata1(1,I)
ENDFOR

[流星尔]

最简单的方法，就是，你在excel中工具栏中宏-录制新宏。等操作完成后，停止录制宏。然后编辑宏，把里面的宏代码放到你的vfp中，稍加修改，即可。