Question

I have a column which is populated using Index and Match functions and it results in a N/A value when the value is not found. I want to be able to replace all such error values from the column by a special value. I want to do this in VBA code. Any help?

I do not want to rewrite the function with an IF logic.

Answer 1

You really could do this without VBA, by the following:

IFERROR(myIndexMatchFormula,"special value")

If you really need a VBA solution, try something like the below. It will find all the error cells in your range and replace with something of your choice. No If statements, no loops!

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