主题：请教列名称问题，困绕了很长时间！

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:列abc.egd

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:7788.egd

太感谢您了！就是要这个效果！

 

但是这个公式有点难啊，我还没能理解！

Eval(mid(Rept("And DeleteCol(Grid,3)",Cols-2),5)) And Eval("AddCol(Grid,"""+Substitute(ListFor("表1基础档案","产品名称",2),"|",""",0, True ) And AddCol(Grid,""")+""",0, True )")

1、Eval(mid(Rept("And DeleteCol(Grid,3)",Cols-2),5))

删除第二列后的所有列

2、创建新列。依据为"表1基础档案"中的"产品名称"列内容。

分解开来看，还是理解不了，我水平太有限了，还是麻烦老师帮忙讲解一下

DeleteCol(Grid,3)这个是删除表中第三列吗

Rept("And DeleteCol(Grid,3)",Cols-2)这里尤其"And DeleteCol(Grid,3)"，是要重复Cols-2次字符？这个字符是什么？

mid(Rept("And DeleteCol(Grid,3)",Cols-2),5)从第六个字符起返回字符？返回内容是什么

Eval(mid(Rept("And DeleteCol(Grid,3)",Cols-2),5)) 这里就是Eval公式在这里起什么作用？

 

"""+Substitute(ListFor("表1基础档案","产品名称",2),"|","""这是什么意思？

And AddCol中""")+"""又是什么？

 

请搜索、参考论坛中的Eval函数。有关Eval函数不是一二句话能够说清楚的，慢慢来吧！

革命尚未成功，本人仍需努力！！

wjq1072老师您好！

按您这个公式，在表1中增加后，表2会自动增加，但当表1产品名称减少或删除时，表2列不能自动删除更新，表1某产品名称修改时，表2也会增加一列，同时修改前的产品名称在表2中的列没删除，请问如何解决这两个问题？还有就是在表2中新增的列名称是左对齐的，有没有办法在公式中使列名称也自动居中？ 

“当表1产品名称减少或删除时，表2列不能自动删除更新”这个问题不存在！

“居中”问题可以这样处理：

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:7788.egd

我认为 wjq1072的回答可以增加或减少列，但是表2的列名是改了，列的内容却没了，这样可能没有什么意义。我根据楼主的意思修改了方法，请看看

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:88888.egd