I have the following macro on start up in my file.

Sub unprotectEm()
ActiveSheet.Unprotect Password:="shreked"
ActiveWorkbook.UpdateLink
Name:="R:\SHARED\PASSACC\EXCEL\PASSACC\CONTROL.XLS " _
, Type:=xlExcelLinks
ActiveSheet.Protect Password:="shreked"
End Sub



Private Sub Workbook_Open()
If ThisWorkbook.ReadOnly = True Then MsgBox "READ ONLY YOUVE BEEN
WARNED"
End Sub

It works fine until its been opened as "read only". What I mean is I
open the file and the read only msg box comes up no prob. When the file
avail for editing again I open the file and its not updating the control
list.
Can anyone help?


--
tweacle