Boa tarde,

Pessoal, eu tenho um arquivo que é acessado por duas pessoas ao mesmo tempo. Eu abro esse arquivo e vou alimentando com as informações durante o dia, e meu gerente deixa aberto e apenas visualiza as informações que vou colocando. Como sempre sou eu que abro primeiro, quando ele abre o arquivo, dá aquele mensagem que o arquivo está em uso, e pergunta se deseja abrir somente para leitura, notificar ou cancelar a abertura do arquivo. Além disso, criei um código, que se o arquivo for aberto somente para leitura, a cada 5 min. o arquivo feche e abra novamente para que meu gerente tenha as informações atualizadas. O problema é que sempre aparece essa mensagem de abrir somente para leitura.

Minha dúvida, é se há alguma forma para desativar essa mensagem?

Private Sub Workbook_Open()
Sheets("BASE").Visible = False
Application.DisplayFullScreen = True
Application.CommandBars("Full Screen").Visible = False
ActiveWindow.DisplayHeadings = False
    TimerActive = True
    If ActiveWorkbook.ReadOnly Then
        ATUALIZAR = MsgBox("Atualizar automaticamente?", vbYesNo, "Atualizar")
        If ATUALIZAR = vbYes Then
            Application.OnTime Now() + TimeValue("00:01:00"), "CloseMe"
        End If
    End If
Application.OnTime Now(), "LEMBRETE"
'ActiveWindow.DisplayHorizontalScrollBar = False
End Sub