Assuming source table in Sheet1, cols A to D, data from row2 down (*Link to
a sample file is provided below)
In Sheet1
---------------
Use an empty col to the right of the data, say col E?
Put in E2: =IF(A2="","",IF(A2=1,ROW(),""))
Copy down to say, E20, to cover the max expected data range in the table
In Sheet2
-----------
With the same headers in A1

1
Put in A2:
=IF(ISERROR(SMALL(Sheet1!$E:$E,ROWS($A$1:A1))),"",INDEX(Sheet1!A:A,MATCH(SMA
LL(Sheet1!$E:$E,ROWS($A$1:A1)),Sheet1!$E:$E,0)))
Copy A2 across to D2, fill down to D20
(cover the same range as in Sheet1)
Sheet2 will auto-return only the rows from Sheet1
where col A contains: 1, all bunched at the top
*Here's a sample file with the implemented construct:
http://flypicture.com/p.cfm?id=50033
(Right-click on the link: "Download File"
at the top in the page, just above the ads)
File: Baffle_misc_1.xls