请问大家用DataToClip方法把dbf数据导入excel表如何去掉剪切版的字段名。









如上图excel文件内红框部分是原始DBF文件的字段名，有什么办法可以取掉落这行吗？

CLOSE data
*USE b7
USE b7    &&打开数据原始表
_vfp.DataToClip(1,,3)     &&将数据原始表的内容读入剪切版
lcFileName='bb7.xls'
oExcel=Createobject('Excel.application')
oExcel.Workbooks.Open('bb7.xls') &&打开模版文件
oExcel.Visible=.T.
oExcel.Workbooks(lcFileName).Sheets(1).Range("a3:a3").Select && 指向拷贝目标区域左上角单元 
oExcel.Workbooks(lcFileName).Sheets(1).Paste && 粘贴搜索结果 

删除活动工作表第一行
oExcel.ActiveSheet.Rows(1).Delete        

删除指定工作表指定行
oExcel.WorkSheets("Sheet1").Rows(3).Delete               

[此贴子已经被作者于2021-2-16 18:23编辑过]

谢谢大神，先祝您新年快乐。
这个办法之前想到过之前也想到过，只是考虑到实际应用中些excel文件内内还有一些图表会引用这些数据，这种删除行的方法可能会对图表引用数据造成影响，所以想研究个可以批量导入数据不删除行的办法。

清除指定区域
oExcel.ActiveSheet.Range("A1:E1").Clear                    
不引起表中数据行移动

先有数据，才有图表，先删除第一行，不会引起图表数据位置的变动吧
也可以修改第一行各个单元格的内容

我在目标EXCEL文件里已经用测试数据做好了图表，现在想的的是后期只管导入数据，统计图随数据自动刷新就好。
我先测试一下看看数据会不会有影响。