Pull data from column but skip if blank

[at162]

This one has me stumped so I thought I'd reach out for some help.

I have three columns of data like this:

X	0	0
X	0	0
X	0	0
0	0	0
X	0	0
X	0	0
X	0	0
X	0	0
0	0	0
X	0	0
X	0	0
0	Y	0
0	Y	0
0	0	0
0	Y	0
0	Y	0
0	Y	0
0	Y	0
0	Y	0
0	0	Z
0	0	Z
0	0	Z
0	0	Z
0	0	Z
0	0	Z
0	0	0
0	0	Z
0	0	Z
0	0	Z

<colgroup><col style="width:93pt" width="125" span="3"> </colgroup><tbody>
</tbody>

The values X, Y, and Z are values which appear based on IF formulas and 0 when the conditions are not met.

What I'm looking to do is to be able to generate a separate table like this which skips any cells with a value of 0.

X	Y	Z
X	Y	Z
X	Y	Z
X	Y	Z
X	Y	Z
X	Y	Z
X	Y	Z
X	Y	Z
X		Z
X		Z
X

<colgroup><col style="width:93pt" width="125" span="3"> </colgroup><tbody>
</tbody>

I've searched around and tried everything that I know, but I am still stumped.

Anyone have any ideas?

Many thanks in advance!

 

[Fluff]

Hi, welcome to MrExcel
Give this a try, changing the ranges to suit

Sub RemoveZero()

    Dim UsdRws As Long
    Dim usdCols As Long

    UsdRws = Range("G1").CurrentRegion.Rows.Count
    usdCols = Range("G1").CurrentRegion.Columns.Count
    Range("L1").Resize(UsdRws, usdCols).Value = Range("G1").CurrentRegion.Value
    With Range("L1").CurrentRegion
        .Replace 0, "", xlWhole
        .SpecialCells(xlBlanks).Delete xlUp
    End With

End Sub