Notifications
Clear all

Bloquear abertura de arquivo, caso ja esteja aberto (rede)

2 Posts
2 Usuários
0 Reactions
832 Visualizações
(@biguroot)
Posts: 5
Active Member
Topic starter
 

Pessoal, tenho uma planilha que ela é utilizada em rede, mas preciso bloquear que não se acesse a mesma caso alguém já esteja utilizando, ou seja, aquela opção que parece para abrir Somente Leitura ou Notificar, gostaria que ela não aparecesse, e que simplesmente não abrisse o arquivo (de preferencia se eu conseguir exibir uma mensagem informando em qual computador está aberto).

Existe alguma maneira de fazer isso?

Obrigado!

 
Postado : 11/09/2015 11:21 am
(@issamu)
Posts: 0
New Member
 

Com a propriedade ReadyOnly é possível saber se o arquivo aberto é ou não somente leitura. Baseado nisso, você pode desenvolver um código no evento de abertura do arquivo que identifique se é somente leitura, e se verdadeiro, então feche a pasta. Por exemplo:

Private Sub Workbook_Open()
If ActiveWorkbook.ReadOnly = True Then
Application.DisplayAlerts = False
ActiveWorkbook.Close
End If
End Sub
 
Postado : 11/09/2015 1:26 pm