突出显示具有错误值的所有单元格

时间:2017-11-21 14:11:19

标签: vba excel-vba excel

我想在工作表中突出显示错误值的单元格,如#Name,#N / A,#Div / 0!,#REF!等。

但是,我可以借助以下代码检测这些是否是表格中的任何错误,但无法弄清楚如何突出显示它们,是否有任何建议?

If VarType(ActiveCell.Value) <> vbError Then
    ' Highlight ActiveSheet.cells.Interior.colorIndex = 3
 End If

1 个答案:

答案 0 :(得分:0)

我刚刚在不使用条件格式的情况下找到了解决问题的方法。

sub highlightErrorCells
  Worksheets(wsName).Activate
  For Each R In Worksheets(wsName).UsedRange
    If IsError(R.Value) Then
     Range(R.Address).Interior.colorIndex = 3
    End If
Next

结束子