EXCEL不是关系型数据库，其同一列的数据类型可以是不同的，所以逐个单元格读入时要注意判断和转换数据类型，否则就容易出错。
活到老，学到老！http://www.（该域名已经被ISP盗卖了）E-mail:hu-jj@
程序代码：for iRow=1 to oSheet.usedRange.rows.count-2 append blank for iCol=1 to oSheet.usedRange.columns.count cFieldName=oSheet.cells(2,iCol).text cFieldVal=oSheet.cells(iRow+2,iCol).value replace &cFieldName with cFieldVal endfor endfor