VBA CountIFS有多个标准

我有一个VBA过程扫描工作表,并产生计数,其中单元格C不等于某些颜色,但列I设置为一个值。 这是程序:

FormulaR1C1 = "=COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,""<>Red"", Sheet1!C,""<>Blue"",Sheet1!C,""<>Green"",Sheet1!C,""<>Black"", Sheet1!C,""<>Purple"",Sheet1!C,""<>White"", Sheet1!C[6],""Temp"")" 

条件已经改变,我需要添加计数条件的另一个标准,所以我认为这将是一个快速修复添加逗号和标准到这样的结尾

 FormulaR1C1 = "=COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,""<>Red"", Sheet1!C,""<>Blue"",Sheet1!C,""<>Green"",Sheet1!C,""<>Black"", Sheet1!C,""<>Purple"",Sheet1!C,""<>White"", Sheet1!C[6],""Temp"",Sheet1!C[6],""Perm"")" 

但是 – 现在这总是返回0.在VBA中添加一个辅助条件到一个CountIFS()的正确方法是什么?

编辑
我想添加的第二个参数也应该是“OR”条件,所以Sheet1!C [6] = Temp或Perm

编辑2
我试图像这样编辑我的语法

 FormulaR1C1 = "=COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,""<>Red"", Sheet1!C,""<>Blue"",Sheet1!C,""<>Green"",Sheet1!C,""<>Black"", Sheet1!C,""<>Purple"",Sheet1!C,""<>White"", Sheet1!C[6],""Temp"")" + "COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,""<>Red"", Sheet1!C,""<>Blue"",Sheet1!C,""<>Green"",Sheet1!C,""<>Black"", Sheet1!C,""<>Purple"",Sheet1!C,""<>White"", Sheet1!C[6],""Perm"")" 

但是这给了我一个错误

应用程序defiend或对象定义的错误

 Dim f f = "=COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,'<>Red'," & _ "Sheet1!C,'<>Blue',Sheet1!C,'<>Green',Sheet1!C,'<>Black'," & _ "Sheet1!C,'<>Purple',Sheet1!C,'<>White'," & _ "Sheet1!C[6],'Temp') + COUNTIFS(Sheet1!C[-2],RC[-2],Sheet1!C,'<>Red'," & _ "Sheet1!C,'<>Blue',Sheet1!C,'<>Green',Sheet1!C,'<>Black'," & _ "Sheet1!C,'<>Purple',Sheet1!C,'<>White',Sheet1!C[6],'Perm')" FormulaR1C1 = Replace(f, "'", """")