然后,VBA Excel如果单元格不等于公式

我想检查一个单元格是否是这个公式,然后执行第二部分脚本

代码简化

Range("B1:C1").Select If ActiveSheet.Name = "Sheet1" And ActiveCell <> "=formula1" Then Sheet1Macro 

完整的代码(长)

 Range("B1:C1").Select If ActiveSheet.Name = "Sheet1" And ActiveCell <> "=IF(OR(IFERROR(SEARCH(""DKB"",RC[-2]),0),IFERROR(SEARCH(""Cox"",RC[-2]),0),IFERROR(SEARCH(""2020"",RC[-2]),0)),RC[-1],"""")" Then Sheet1Macro 

我只是问如何检查单元格是否是一个公式,因为我插入行,并将公式从A2:F99更改为A99:F189例如

 If ActiveSheet.Name = "Sheet1" And Range("B1").FormulaR1C1 = "=IF(OR(IFERROR(SEARCH(""DKB"",RC[-2]),0),IFERROR(SEARCH(""Cox"",RC[-2]),0),IFERROR(SEARCH(""2020"",RC[-2]),0)),RC[-1],"""")" Then Sheet1Macro