Write VBA to delete and shift up cells with certain value

[DGuidry]

I have a table A5:N98. I want to delete and shift up cells with #NUM!. How do I write code for that?
Thx!

 

[Joe4]

Are these errors the result of formulas?
If so, what exactly is the formula?

Would all columns A-N in a row have the #NUM error in it?
Because you are dealing with a table, it really doesn't make sense to shift up the values in the column up, but not in the whole row.

I think it would be beneficial for us to see what your data looks like.
Can you show us a sample of your data and you expected results?

MrExcel has a tool called “XL2BB” that lets you post samples of your data that will allow us to copy/paste it to our Excel spreadsheets, so we can work with the same copy of data that you are. Instructions on using this tool can be found here: XL2BB Add-in

Note that there is also a "Test Here” forum on this board. This is a place where you can test using this tool (or any other posting techniques that you want to test) before trying to use those tools in your actual posts.

 

[Legacy 143009]

Sub DeleteErrorFunction()
  For Each Rng In ListObjects("Tabe1").Range 'Your table name
    If IsError(Rng) Then
      Rng.Delete Shift:=xlUp
    End If
  Next
End Sub