select一个特定的公式

我想知道是否有人知道一种方法来获取一个单元格来实现基于另一个单元格内容的特定公式。

例如,如果一个单元格包含“一般”,那么通用的总和公式被应用于该单元格,但是如果它包含“条件”,那么应用一个识别公式。 我不能通过一系列的链式if语句来做到这一点,因为有大约500个公式不断地被添加和修改,公式input区域不足以支持它们。

我已经使用UDF计算出来并进行评估。

 Public Function ev(r As String) As Variant Application.Volatile (True) ev = Evaluate(Replace(r, "@", Application.Caller.Row)) End Function 

在ev()调用中放入一个Vlookup,并用@代替所有行引用的公式。 不知道这是否是最好的方式,但它有效。