我仔细分析了楼主的代码，问题出在 REPLACE xm WITH myexcel.cells(i,2),zymc WITH myexcel.cells(i,3) 这条语句，应改为：REPLACE xm WITH myexcel.cells(i,2).Value,zymc WITH myexcel.cells(i,3).Value
另外，若不在 Cells(i,2) 后面加“.Value”，即使将 i 改为常量 5 也会报错。因为 Cells(2,5) 是一个对象，而我们要引用的是它的值，二者的数据类型不同。


[ 本帖最后由 liuxingang28 于 2014-5-9 16:34 编辑 ]

楼主这样操作可能会出现问题。我通常是先将EXCEL单元格的值读入到内存变量中，经过数据类型、数值合理性检验之后再保存到DBF表中。因为我们无法确保EXCEL表单元格中的数据类型完全符合要求，须知EXCEL中同一列的数据类型是可以随意改变的。

谢谢各位大侠的伸手援助，现在问题是解决了，只是我还是不能用单个读取单元格数值方法，最后只好利用数组传送数据，再用循环追加到数据表中。当然在追加之前还是要加分支结构进行数据类别的差别。再次深深的感谢。

zymc WITH myexcel.cells(5,3).value 或zymc WITH myexcel.cells(5,3).text 都 可以
但是 将 .value  .text 换成变量，以实现软编码，且不行了

问高手如何 解决？

请问高手，在VFP程序编制中，导入EXCEL数据的代码怎么写，请举例说明