title: VBA: loop to copy certain columns from main sheet, create a new sheet, and paste
body: <p>I have a sheet with a specific number columns. I need to copy columns A and another column starting with column B, create a new sheet and paste those columns there. I then want to loop it so that it copies columns A and C this time, then create a new sheet and paste, and so forth until it reaches the last column on the main sheet. Column A is fixed so that it is always copied, the second column copied is the one that varies. I'm thinking something like this inside the loop</p>
  
  <pre><code>Sheets(1).Activate
  Range("A1:A14").Select
  'This is where I need to copy the next column over and increment every time the code loops
  Selection.Copy
  Sheets.Add After:=Sheets(Sheets.Count)
  ActiveSheet.Paste
  </code></pre>
  
  <p>Help would be appreciated. Thank You.</p>