title: Excel VBA remove blank row after cut
body: <p>I have this code which cuts and pastes an entire row to another sheet, how could I remove the blank row which now appears on the first sheet in which the original row was cut.</p>
  
  <pre><code>Set ASR = ActiveWorkbook.Sheets("Main")
  Set LS = ActiveWorkbook.Sheets("Exclusions")
  
  ASR.cells(i, "C").EntireRow.Cut Destination:=LS.Range("A" &amp; LS.Rows.Count).End(xlUp).Offset(1)
  </code></pre>
  
  <p>I was hoping this line of code which I got from this <a href="https://stackoverflow.com/questions/12986520/excel-vba-remove-blank-rows-in-table">answer</a> would remove the blank rows, but it did not work</p>
  
  <pre><code>ASR.cells.Delete Shift:=xlUp
  </code></pre>