Merging Data from many workbooks in to one workbook

Try this in place of my last code

Code:

---

    Application.DisplayAlerts = False
    Do While ThisWorkbook.Worksheets.Count > 2
        ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count).Delete
    Loop
    Application.DisplayAlerts = True
    Set BaseWks = ThisWorkbook.Worksheets(2)

---

Hi, -

This seems woking fine. However the file i am copying contains password (same password for all files), and this code gives me an debug option about the protected sheets. and highlights .value=.value
Where shoud i define the password in this code to resolve this.

Write

Code:

---

.parent.unprotect "passwordhere"

---

right before that line

Hi in the sheet to which their is a link there is a sheet which does exaclty that, Each teacher makes a copy punch his data in and than any one sheet is used to import all of the other data where ever it has been saved usually it is done from a USB stick

Hi,

Can you please mention the link only to the file. There are several links in your post.

Thanks
Rajesh