title: Copy only last row
body: <p>have a macro that Copies complete columns to another sheet.</p>
  
  <p>Currently though, I need a Macro to only copy the last ROW with data</p>
  
  <p>Example, If i have the following:</p>
  
  <p>Cell A1 = 1, Cell A2 = 2, Cell A3 = 3, Cell A4 = Sum (A1:A3),Cell A5 = Blank</p>
  
  <p>I want the macro to only copy A4. I am doing this for entire columns (A to E) Thanks</p>
  
  <p>Someone already helped me with the below code, which copies all data till the last row, excluding the last row.
  I need it to do the opposite, only copy the last row</p>
  
  <pre><code>Dim lrow As Long
  
  With wbk4.Sheets("Sheet1")
  lrow = .Range("A" &amp; .Rows.Count).End(xlUp).Row
  .Range("A1", "E" &amp; lrow - 1).Copy
  wbk2.Sheets("Sheet1").Range("XD1").PasteSpecial xlPasteAll
  End With
  </code></pre>