title: I want to copy a range of cells from one sheet to another sheet in the next blank row
body: <p>My workbook consists of two sheets. The first is used to enter data into "New Entry" and the other is a log "log" of all the entries over time. The "New Entry" Sheet is cleared so the next data set can be entered.</p>
  
  <p>I need to copy the data from the  "New Entry" Sheet into the "Log" Sheet in the next blank cell.</p>
  
  <p>Here is what i have so far. My first issue is that sometimes the range that it is copying has blank cells, and i do not want to copy those. I only wnat to copy cells with values in that range.</p>
  
  <p>My other issue is that I cannot get the copied cells to paste into the next blank cell.</p>
  
  <p>I am not experienced in this and i have been working on this for over a week!</p>
  
  <pre><code>    Private Sub CommandButton1_Click()
  Application.ScreenUpdating = False
  Dim copySheet As Worksheet
  Dim pasteSheet As Worksheet
  
  Set copySheet = Worksheets("New Entry")
  Set pasteSheet = Worksheets("Log")
  
  copySheet.Range("H35:AY45").Copy
  pasteSheet.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues
  Application.CutCopyMode = False
  Application.ScreenUpdating = True
  End Sub
  </code></pre>