Macro - to cut the entir row and paste at the bottom after leaving 5 empty rows

[harikrishna]

HI, please provide a macro -That finds the data in a particular column and cut the entire row and paste that row at the end of the orginal data after leaving 5 rows (empty rows).
eg:- 1. if a cell in column E contains as "998150", then the entire row should be cut and paste at the bottom of the data after leaving 5 empty rows. And it should be continuous till all the rows with same data(998150) in Column E.

2. All the cut rows shoud pasted one below the other.
Eg: if a cell in Column E and row # 20 contains 998150 it should be cut and pasted at the end of teh data (as mentioned above). And if a cell in Column E and row # 21 also contains 998150 it should be cut and pasted just below to the above last row which is pasted.

I mean all the data/rows which has been cut must be pasted one below to other after the end of original data as mentioned in point 1 above.

for your clear under standing..........

000010000
000010000
000010000 " Assume these five rows are original data"
000000000
000020000

I am finding the data "1" in a cell of Column E. As we have 3 rows which meet our crieteria, those three rows should cut and paste at the bottom of the above original data as shows below....

000000000
000020000
-----------
-----------
----------- "Assume thse five are empty rows after the original data"
-----------
-----------
000010000
000010000 "this is the data which is cut from the above original 000010000 data and pasted after leaving 5 rows of gap from original data"