title: Insert a String and a Sequential Number Every Other Column in VBA
body: <p>I cannot figure this out. </p>
  
  <p><a href="http://i.stack.imgur.com/3cowo.png" rel="nofollow">First Few Columns of data</a></p>
  
  <p>Right Now I've got a bunch of worksheets with 500-1000 columns with data. Next to each Column is a blank space I inserted. I'm Trying to insert the text "Column" Followed by a sequential number "Column1" "Column2" "Column3" etc until the data ends. </p>
  
  <p>So far I have tried playing around with</p>
  
  <pre><code>Sub insert_column_every_other()
  Dim lColumn As Long
  lColumn = ws.Cells(2, Columns.Count).End(xlToLeft).Column
  For colx = 2 To col.last Step 2
  Columns(colx).Value = "Column" +1
  Next
  End Sub
  </code></pre>
  
  <p>but its not even close. Does anybody have any idea how to do this?</p>