title: Combine Multiple Excel Workbooks into one Workbook with multiple sheets
body: <p>I have about 70 different excel files that I need to combine into one master workbook. I would like each excel file to get its own worksheet in the master workbook. The name of the worksheet generated in the master workbook doesn't matter. </p>
  
  <p>I retrieved this code off of another website, but cannot make it work for my needs. This code stipulates that all files to be combined are located in the same directory. I have them located here "C:\Users\josiahh\Desktop\cf"</p>
  
  <p>Below is the code as it is now</p>
  
  <pre><code>Sub GetSheets()
  Path = "C:\Users\dt\Desktop\dt kte\"
  Filename = Dir(Path &amp; "*.xls")
  Do While Filename &lt;&gt; ""
  Workbooks.Open Filename:=Path &amp; Filename, ReadOnly:=True
  For Each Sheet In ActiveWorkbook.Sheets
  Sheet.Copy After:=ThisWorkbook.Sheets(1)
  Next Sheet
  Workbooks(Filename).Close
  Filename = Dir()
  Loop
  End Sub
  </code></pre>