selective output tabling

Hi,

I have an extended table;

A B C D E

1 key area code present required
2 1 LGA FD J3 2 1
3 2 LGA1 G2 0 3
4 3 LGA2 X5 3 0
5 4 LGA3 I/14 1 2
6 5 GA L2 6 0
7 6 1A Z1 1 2
8 ...

The formula in 'E1' is: =IF(D2=3,0,3-D2)

All other cells contain static/manually enterd data.

What I need to do is create another sheet that tabulates all keys that
are required and omits those that are not without running a macro
preferably.

e.g. 'Order' worksheet would look like this;

A B C D E

1 key area code present required
2 1 LGA FD J3 2 1
3 2 LGA1 G2 0 3
4 4 LGA3 I/14 1 2
5 6 1A Z1 1 2
6 ...

any suggestions welcome

many thanks