Copy unique databodyrange from table1 to table2

Hi everyone!

I am trying to copy values of column A, F, G, H if the criteria in G is met "Exceeded". And delete the entire row in table1.

Thank YOU!

Sheet1(is also a table)
Row A4 to H4 is header
move region, total, status and year -> sheet2
delete those values that meet the criteria from sheet1

Sheet2 (formatted into a table)
Row A1 to D1 is header (Region, Total, Status, Year)

This is the code that I was trying to modify

Please Login or Register  to view this content.

Here is what I came up with, debug, and line 8, 9, 10, 11 are getting an error: subscript out of range (error 9). I am trying to copy row A5, F5, G5, H5 to table2 in sheet2, and then delete the entire row (whatever row(s) that met the criteria "Exceeded" delete A, B, C, D, E, F, G, H rows) from sheet1(table1). But only copy A, F, G, H columns if the criteria was met.

Please Login or Register  to view this content.

Possibly...

Please Login or Register  to view this content.