My data is like this:
A B C D ...... I
J
1 1 2 3 4 9
10
2 2.5 0 5 4 0
3.5

when I transfer these two rows, only those columns should be transferred
which do not have "zero" in second row. But this leaves blank in between
column, i would like to remove those blanks, and the pasted data should
be in consecutive columns.

Like in above case, I should get columns A, C, D and J in another worksheet
as columns A, B, C, D

pl help