Multi Users in Excel

Hi,

Maybe a loop like this for the second user?

Code:

---

If Sheets("Lookups").Columns("N").Find(LogInName).Offset(0, 2) = "Full Access" Then
    Do Until ActiveWorkbook.ReadOnly = False
        ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite
    Loop
End If

---

I'm still not convinced its a good idea to re-create something thats already there :)

I dont really want to recreate what is already there, I just want to give certain people access levels for the workbook, due to the requirements of the project I have been given.

When it comes to a FullAccess User I am looking to do is this. When a FA User opens the workbook it scans the column Q to see if there is a date in the TimeDateStamp, if there is then I want it to say they cant edit until the other user has finished. I am then looking to have a refresh so every couple of minutes the refresh runs to see if there is any FA User still in the workbook, if not allow the other FA User to revert from the ReadOnly into the FullAccess so that they can edit/amend etc :)

Does anyone have any ideas on this?