主题：[求助]Eval公式

有如下自动格式公式： 

IF([" +ColName+ "] = "" And ([" +ColName+ "] ＝[红

1] Or [" +ColName+ "] ＝ [红

2] Or [" +ColName+ "] ＝[红

3] Or [" +ColName+ "] ＝[红

4] Or [" +ColName+ "] ＝[红

5] Or [" +ColName+ "] ＝[红

6]),1,IF([" +ColName+ "] <> "" And ([" +ColName+ "] <>[红

1] And [" +ColName+ "] <>[红

2] And [" +ColName+ "] <>[红

3] And [" +ColName+ "] <>[红

4] And [" +ColName+ "] <>[红

5] And [" +ColName+ "] <>[红

6]),2,IF([" +ColName+ "] <> "" And ([" +ColName+ "] = [红

1] Or [" +ColName+ "] = [红

2] Or [" +ColName+ "] = [红

3] Or [" +ColName+ "] = [红

4] Or [" +ColName+ "] = [红

5] Or [" +ColName+ "] = [红

6]),3,"")))

请教：在使用Eval()函数时，能不能将上述公式中的绿色部分先作为尾部植入公式，再在植入的尾部后继续按头、中、 尾三个部分植入……，直到三个转换函数完成？

按上述思路，得到以下公式：

Eval("IF([" +ColName+ "] = """" And ([" +ColName+ "] = [红" +Substitute("1|2|3|4|5|6","|","Or [" +ColName+ "] = [红") + "]),1,IF([" +ColName+ "] <> """" And ([" +ColName+ "] <>[红" +Substitute("1|2|3|4|5|6","|","] And [" +ColName+ "] <> [红") + "]),2,IF([" +ColName+ "] <> """" And ([" +ColName+ "] = [红" +Substitute("1|2|3|4|5|6","|","] Or [" +ColName+ "] <> [红") + "]),3,"""")))")

但运行结果好像不对，请指教。

谢谢。

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

点击浏览该文件:5566.egd

另外还有一个关于列名通用公式的问题。

在Eval()函数运用中，类似[" +ColName+ "] =[红1] 这种情形，我们是把[" +ColName+ "] 作为[围红_]各列的通用公式来使用的，但公式会不会同时把[" +ColName+ "]指认为[红1]呢？因为[" +ColName+ "] 并没有特指是哪些列。

谢谢各位老师。

有两个问题请教：

1、["+ColName+"]与ColName(2)的使用区别在哪里？

2、式中[红1]、[红2]、[红3]不能用转换函数吗？如果[红]列很多的话，岂不公式会要写很长？

谢谢。

哦。谢谢老师了。

 

可以将ColName(1) 代表第一层吗？（**_a）"**_"或是"**"。

懂了。谢谢。