Do not show "Open as read only" message

[rolo]

Is there any workbook open event so when the user opens the file,
it does not appear the "Open as read only" message?

Notice that the file is not opened by vba, the file is opened manually by the user

Thanks!

 

[PCosta87]

Hi,

Untested but try the following:

Private Sub Workbook_Open()

    Application.DisplayAlerts = False

End Sub

If it works don't forget to re-enable them at some point

 

[rolo]

It doesn´t work

Seems that the only way to avoid read only message is to open the workbook from another workbook using this

WorkBooks.Open FileName:="C:\Book1.xls", IgnoreReadOnlyRecommended:=True