title: VBA macro copy column from one sheet to another with blanks in between
body: <p>I need to copy a column (say A) from sheet <code>ABC</code> to another column say B in sheet <code>DEF</code>.</p>
  
  <p>I have been using this code:</p>
  
  <pre><code>Sheets("ABC").Activate
  ActiveSheet.Range("A1").Select
  ActiveSheet.Range(Selection, Selection.End(xlDown)).Select
  Selection.Copy
  
  Sheets("DEF").Activate
  ActiveSheet.range("B1").Select
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False'
  </code></pre>
  
  <p>This works fine, but it does not copy any further values if a blank value comes in between. Could you please help me out with this?</p>
  
  <p>I need the entire column A in sheet <code>ABC</code> to be there in column B in <code>DEF</code></p>
  
  <p>Thanks a lot for your help!</p>