主题：代码错误吗

感觉是表C的列名 或 当前表是不是代码中的currenttable 问题, 附上个例子帮你测试~  

楼主表A的产品 A . B . C . ........  在表C中成了列名(像交叉统计那样)

充填后,可能缺了:MainTable = Tables("表C") 一行代码

是呀～  因为楼主1楼代码的currenttable 可能就是指的没有打开的 表C 啊～  没有他的文件，不能测试···  呵呵。

呵呵···  咱比楼主还急～  

for i as Integer = 0 to tables("表C").count - 1

    Dim r As Row = Tables("表C").Rows(i)
        r(cl.name) = ......
或：
        Tables("表C").Rows(i)(cl.name) = ......
        ..............

Next