VBA delete the entire line if the cell equal to 0

[shinpencil]

Hi, I want to compare 2 workbooks (sheet 1 of "Compare EF" and wb2), the result will display in sheet 2 of wb "compare EF". The problem is that I want to delete the entire rows in the result if the value of column E equal to 0. It should look like that instead of the result already have in the "Differences" sheet:

Using Excel 2007

Row\Col	A	B	C	D	E	F	G
2	Missing order in Lomax 19/07/2016
3
4	There is no difference
5
6	Missing order in EFS 19/07/2016
7	LU05137410	19/05/2016	24/05/2016	Unit	9	Abs
8	LU08126074	19/05/2016	24/05/2016	Unit	612.75	Abs
9	LU08126096	19/05/2016	24/05/2016	Unit	8.5	Abs
10	LU08324354	18/05/2016	19/05/2016	Unit	6300	Lyx

Sheet: Differences

Could someone help me plz?

[shinpencil]

I write this code in the sub "Find differences" (rem 14) but it doesn't work:

Please Login or Register  to view this content.

[AB33]

You need to loop back wards if you want to delete rows. Filter is much more efficient.

Please Login or Register  to view this content.

[shinpencil]

Thank you, I tried your code but it didn't work...

[AB33]

It worked on the attached sample.

[shinpencil]

Actually it reversed the orders in the result sheet

[AB33]

The code works on the reference sheet as you can see from the attached. Your naming of sheets is very unusual and will lead to error

[shinpencil]

It is because it will show the differences between 2 wb (Missing order 1 and Missing order 2), so if it delete rows backwards, it will also delete the title Missing order 2 so the 2 result will be mixed and aren't clears.

I only need to loop in the first part (Missing order 1) and indicate "There is no difference" if all rows in the first "Missing order.." are deleted, so I don't know if looping backwards is efficace

[shinpencil]

Post deleted