title: Finding and Deleting zeroes from data
body: <p>So I'm at novice level working with VBA and I was attempting to use this code to find zero values and delete them from my data set.</p>
  
  <pre><code>Sub delete_empty_cells()
      Dim lRow As Long
      Dim iCol As Long
      Dim iCntr As Long
      lRow = 73
      iCol = 50
      For iCol = 50 To 1 Step -1
          For iCntr = lRow To 1 Step -1
              If Cells(iCntr, 1) = 0 Then
                  Range(iCol &amp; iCntr).Delete Shift:=xlUp
              End If
          Next
      Next
  End Sub
  </code></pre>
  
  <p>My data set is 73 by 50, but the size can change so an explanation on how to change the size of the parsed data would be stellar. I actually have very minimal idea on what's going on here so any help would be appreciated.</p>