如何替换列中的所有错误值

Sir*_*een 1 excel vba excel-vba

我有一个使用索引和匹配函数填充的列,当找不到该值时,它会产生一个N/A值.我希望能够通过特殊值替换列中的所有此类错误值.我想在VBA代码中执行此操作.有帮助吗?

我不想用IF逻辑重写函数.

Sco*_*man 5

你真的可以在没有VBA的情况下做到这一点,具体如下:

IFERROR(myIndexMatchFormula,"special value")

如果您确实需要VBA解决方案,请尝试以下内容.它将找到您范围内的所有错误单元格,并替换为您选择的内容.没有If陈述,没有循环!

Option Explicit

Sub replaceErrors()

Dim rng As Range

On Error Resume Next

Set rng = Range("A1:A10").SpecialCells(xlCellTypeFormulas, 16) ' -> replace with your specific range

rng.Value = "special values" '-> place what you want here

On Error GoTo 0

End Sub
Run Code Online (Sandbox Code Playgroud)

  • + 1给出两个解决方案:) (2认同)