使用xlR1C1样式将公式input到单元格中

我有一个公式来实现xlR1C1风格。

我在营销数据库中添加一个新的营销条目。 我希望Cells (emptyRowM,9) Cells (emptyRowM, 7)在另一个工作表的数据透视表中的Cells (emptyRowM, 7)中search市场推荐代码。 此数据透视表显示了与每个市场推介代码关联的总收入。 因此,如果Cells (emptyRowM, 7)为零, Cells (emptyRowM, 9将为空白,否则,它将总结与引用代码相关的所有收入。

 Dim emptyRowM As Long emptyRowM = Range("B100000").End(xlUp).Offset(1, 0).Row Cells (emptyRowM, 9) = "=IF(AND(SUMIF('Pivot Table'!B6:B99,'Marketing Data'!G12,'Pivot Table'!C6:C99)=0),"",SUMIF('Pivot Table'!B6:B99,'Marketing Data'!G12,'Pivot Table'!C6:C99))" 

转到文件 – >选项 – >公式中使用公式打勾“R1C1参考样式”

所以你的公式应该变成这样

= AND(SUMIF('Pivot Table'!R [-5] C [-5]:R [88] C [-5],'Marketing Data'!R [1] C,'Pivot Table'!R [-5] C [-4]:R [88] C [-4])= 0),“”,SUMIF('Pivot Table' [-5],“营销数据”!

然后使用Cells(emptyRowM,9).FormulaR1C1 =“= IF(AND(SUMIF('Pivot Table'!R [-5] C [-5]:R [88] C [-5] R [1] C,'Pivot Table'!R [-5] C [-4]:R [88] C [-4])= 0),“”,SUMIF('Pivot Table'!R [ 5] C [-5]:R [88] C [-5],“营销数据”!

如果您有任何问题,请告诉我。

干杯,Sujoy