Workbook.ExclusiveAccess (Excel)

Atribui ao usuário atual acesso exclusivo à pasta de trabalho que está aberta como uma lista compartilhada.

O método ExclusiveAccess salva quaisquer alterações que você tenha feito à pasta de trabalho e requer que os outros usuários que tenham a pasta de trabalho aberta salvem suas alterações em um arquivo diferente. Se a pasta de trabalho especificada não estiver aberta como uma lista compartilhada, este método falhará. Para determinar se uma pasta de trabalho está aberta como uma lista compartilhada, use a propriedade MultiUserEditing .

Dim booExclusiveAccess As Boolean
booExclusiveAccess = ActiveWorkbook.ExclusiveAccess()