title: Compile Multiple .xls files in Shared Drive
body: <p>I'm looking to <code>compile several daily xls files</code> into one master file. The location is in a shared folder but I can also copy them to my desktop. I'm using the developer tab in Excel and have researched some other sources online. </p>
  
  <pre><code>Sub GetSheets()
  Path = "C:\Desktop\test_for_margaret\"
  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>
  
  <p>My VBA knowledge is limited but I figure there is more to change the lines following the Path.  </p>