Hello Skip,
I tried that correction and the copying now works.
However, it still breaks on the Workbooks.Add line (but only once). I can press continue.
It then breaks again on the .Sheets("SummaryMirror").Visible = True line.
I can press continue.
And on the 'baseCell.PasteSpecial...
Skip,
Thanks for replying again! Much appreciated.
If you mean which sheet is visible on the screen, than it is the source file sheet - the summary mirror. This sheet contains the range (A1:N12) which I want to copy.
Hope you can help.
Bye,
Remco
Hello Skip,
Many thanks for your quick response.
Unfortunately, it does not work.
It breaks on the Workbooks.Add line.
However, I can press continue and it then creates a new file correctly.
It then breaks again on the .Sheets("SummaryMirror").Visible = True line.
I can press continue again...
Hi,
I had the following code working in Excel 2003 to read a hidden tab (SummaryMirror) with data and copy the data into one new workbook for all files within a specific directory.
Sub MergeTrackers()
Dim lastRow As Integer
Dim docPath As String
Dim baseCell As Excel.Range
Dim...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.