title: Copying columns from multiple excel files and pasting into one master file
body: <p>I want to copy one column (always the same one - B3:B603) from multiple excel files and paste those columns to one file, so I can combine all data in one place. My macro successfully searches for, and pastes this column of data into an empty column (which is C3 in my master file). </p>
  
  <p>When I have more than one column to paste, my macro pastes new columns always in the same position (C3), so overwrites the previous data. How to make the macro to recognise that the next column should be pasted always to the next empty column (so D3, then E3 etc.). </p>
  
  <p>I know similar problems were discussed already, but I am an amatour in programming and I couldn't solve it based on the previous answers.</p>
  
  <p>My current code is:</p>
  
  <pre><code>Sub LoopThroughDirectory()
  Dim MyFile As String
  Dim Filepath As String
  Filepath = "D:\DATA\"
  MyFile = Dir(Filepath)
  
  
  Do While Len(MyFile) &gt; 0
      If MyFile = "zmaster.xlsm" Then
      Exit Sub
      End If
  
      Workbooks.Open (Filepath &amp; MyFile)
      Range("B3:B603").Copy
      Application.DisplayAlerts = False
      ActiveWorkbook.Close
  
  ActiveSheet.Paste destination:=Worksheets("Sheet1").Range("B3:B603")
  
      MyFile = Dir
  Loop
  End Sub
  </code></pre>