运行时错误“13”types不匹配如果然后语句

我得到了一个运行时错误“13”（types不匹配）下面的代码，我不明白为什么。 在添加“和”和第二个条件之前，它正在工作。 第一个（a，43）值是读作“＃N / A”的错误。 有任何想法吗？

If IsNumeric(Sheets("Reuters").Cells(a, 43).Value) = True And _ Abs(Sheets("Reuters").Cells(a, 43).Value) >= 0.0799 Then pfl = "P" ct = ct + 1 Else pfl = Empty End If 

Answer 1

改变你的代码说

 pfl = Empty If IsNumeric(Sheets("Reuters").Cells(a, 43).Value) Then If Abs(Sheets("Reuters").Cells(a, 43).Value) >= 0.0799 Then pfl = "P" ct = ct + 1 End If End If