title: Copying columns from multiple sheets into one sheet in the same workbook using VBA
body: <p>My goal is to automatically copy a range of columns (A:C) from 40+ Excel Sheet into one Sheet located in the same workbook.</p>
  <p>The structure of all sheets is identical. Columns consist of numeric values. I want the columns to be added to the right at each iteration (so the target sheet will be enriched horizontally with the data)</p>
  <p>My attempt (see the code below) is not automated as if I have to specify Sheet Names and Target Cell where it is possible to copy the columns</p>
  <pre><code>Sub macro()
      Sheets(&quot;Top&quot;).Select
      Columns(&quot;A:C&quot;).Select
      Selection.Copy
      Sheets(&quot;Low&quot;).Select
      Range(&quot;D1&quot;).Select
      ActiveSheet.Paste
  End Sub
  </code></pre>
  <p>Any help is appreciated! Thank you</p>