title: Macro to Check column of Values, then render items into different sheet
body: <p>I have a sheet1 that looks like:</p>
  
  <pre><code> ITEM      QTY
  ======     ===
  "ITEM1"     2
  "ITEM2"     0
  "ITEM3"     1
  "ITEM4"     0
  </code></pre>
  
  <p>And I have another sheet2 where I'd like it to check to see if the item in this table has a quantity greater than zero, and if so, write to a new table in sheet 2 thus:</p>
  
  <pre><code> ITEM      QTY
  ======     ===
  "ITEM1"     2
  "ITEM3"     1
  </code></pre>
  
  <p>I would know how to do this an other language, like ruby, but I don't really know VBA that well. Was hoping someone could help me out. I'm thinking, that in pseudocode, it would look something like</p>
  
  <pre><code>SheetCounter=1
  SelectSheet1
    for(x=1, x &lt; column-height, x++)
      if(item-x.qty &gt; 0)
        copy item.x.title to sheet2, cell $A$SheetCounter
        copy item.x.qty to sheet2, cell $B$SheetCounter
        SheetCounter++
        x++
      else
        x++
    end
  </code></pre>