在VFP统计生成Excel表后，要将数据复制粘贴到另一个带有表头中Excel中，十几年前做过，现忘了，特求这个代码。
过程是;
    1.在mbt文件夹中复制m1.xls（表头文件）到mb文件夹中，文件名为m2.xls
    2.在mb文件夹中打开m3.xls（数据源文件),选中单元格A2:F10(mk1=A2,mk2=F10),复制数据
    3.在m2.xls中A4起粘贴
4.添加表格线
5.定位A1,添加表头名"bbb"
6.另存为
7.退出Excel

COPY FILE d:\mbt\m1.xls TO d:\mb\m2.xls    &&在mbt文件夹中复制m1.xls（表头文件）到mb文件夹中，文件名为m2.xls
eOle=Createobject("Excel.application")
eOle.Workbooks.Open("d:mb\m3.xls")
eOle.ActiveSheet.Range("A2:F10").Copy        &&在mb文件夹中打开m3.xls（数据源文件),选中单元格A2:F10(mk1=A2,mk2=F10),复制数据
eOle.ActiveWorkbook.Close

eOle.Workbooks.Open("d:mb\m2.xls")
eOle.ActiveSheet.Range("A4").PasteSpecial        &&在m2.xls中A4起粘贴
eOle.Range("A4:F12").Borders.LineStyle=1  &&添加表格线
eOle.Cells(1,1).Value="bbb"        &&定位A1,添加表头名"bbb"
*eOle.ActiveWorkbook.SaveAs("d:mb\m4.xls")        &&另存为
eOle.ActiveWorkbook.Close    &&关闭工作簿
eOle.quit        &&退出Excel