Display message after workbook.open

Sub ShutDown()
Application.DisplayAlerts = False

If ThisWorkbook.ReadOnly = True Then
    'Do nothing, just continues.

Else 'modo escrita

    If Worksheets("Login").Range(UtilizadorAtual) = Empty Then 'ficou em standby no login
        ThisWorkbook.Save
        Application.Quit
    Else 'Já estava com utilizador introduzido
        ThisWorkbook.Save
        ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly
        
        Workbooks.Open ThisWorkbook.Path & "\" & ThisWorkbook.Name, , True
        'MsgBox "ESTEVE AUSENTE MAIS DO QUE 2 MINUTOS. O FICHEIRO FOI GUARDADO." _
        '+ vbCrLf + "AGORA ESTÁ EM MODO LEITURA." _
        '+ vbCrLf + "NENHUMA EDIÇÃO POSTERIOR A ESTA MENSAGEM SERÁ GRAVADA."
    End If
    
    Standby_Message.Show ' Tested with userform, but still nothing
    MsgBox "ESTEVE AUSENTE MAIS DO QUE 2 MINUTOS. O FICHEIRO FOI GUARDADO." _
    + vbCrLf + "AGORA ESTÁ EM MODO LEITURA." _
    + vbCrLf + "NENHUMA EDIÇÃO POSTERIOR A ESTA MENSAGEM SERÁ GRAVADA."
End If
    
Application.DisplayAlerts = True
End Sub

That's what i have and i need to display the message after Workbook.open:

Workbooks.Open ThisWorkbook.Path & "\" & ThisWorkbook.Name, , True

Hope someone help me out with this