title: Select & Copy Only Non Blank Cells in Excel VBA, Don't Overwrite
body: <p>I cant seem to find a solution for my application after endless searching. This is what I want to do: </p>
  
  <p>I have cells in one excel sheet that can contain a mixture of dates and empty cells in one column. I want to then select the cells that have only dates and then copy them to a corresponding column in another sheet. They must be pasted in exactly the same order as in the first sheet because there are titles attached to each row. I do get it right with this code:</p>
  
  <pre><code>'Dim i As Long
  
  'For i = 5 To 25
  
  'If Not IsEmpty(Sheets("RMDA").Range("D" &amp; i)) Then _
  
  Sheets("Overview").Range("D" &amp; i) = Sheets("RMDA").Range("D" &amp; i)
  
  'Next i
  </code></pre>
  
  <p>However, the dates in the first sheet are being updated on a daily basis and it can be that one title has not been updated (on another day) on the first sheet because the user has not checked it yet. If I leave it blank and If I follow the same procedure then it will "overwrite" the date in the second sheet and make the cell blank, which I do not want. I hope I was clear. Can someone please help me?</p>
  
  <p>Regards</p>