Solved: VBA Index/Match Help

This is my code, it works fine. The only problem is when I get a #N/A. How can I return a blank instead of #N/A?

[VBA]Public Sub IndexMatch()
Dim lastrow
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
With Worksheets("Master").Range("c2:c" & lastrow)
.Formula = "=INDEX(Daily!$A$2:$P$65536,MATCH(A2,Daily!$A$2:$A$65536,),2)"
.Value = .Value
End With

End Sub[/VBA]

Thank you.

[vba]

Public Sub IndexMatch()
Dim lastrow
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
With Worksheets("Master").Range("c2:c" & lastrow)
.Formula = "=IF(ISNA(MATCH(A2,Daily!$A$2:$A$65536,)),"",INDEX(Daily!$A$2:$P$65536,MATC H(A2,Daily!$A$2:$A$65536,),2))"
.Value = .Value
End With
End Sub [/vba]

Quote:

---

Originally Posted by xld

[vba]

Public Sub IndexMatch()
Dim lastrow
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
With Worksheets("Master").Range("c2:c" & lastrow)
.Formula = "=IF(ISNA(MATCH(A2,Daily!$A$2:$A$65536,)),"",INDEX(Daily!$A$2:$P$65536,MATC H(A2,Daily!$A$2:$A$65536,),2))"
.Value = .Value
End With
End Sub [/vba]

---

I tried that one and a 1004 error comes up with that formula...

Oops, my bad.

[vba]

Public Sub IndexMatch()
Dim lastrow
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
With Worksheets("Master").Range("c2:c" & lastrow)
.Formula = "=IF(ISNA(MATCH(A2,Daily!$A$2:$A$65536,)),"""",INDEX(Daily!$A$2:$P$65536,MA TCH(A2,Daily!$A$2:$A$65536,),2))"
.Value = .Value
End With
End Sub
[/vba]

Works. Thanks. It took two tries because for some reason excel kept adding an extra " at the end. Thank you.