Classe CoAuthLocks (Word VBA)
Uma coleção de objetos CoAuthLock . Para usar uma variável de classe CoAuthLocks, ela primeiro precisa ser instanciada por exemplo
Dim cals as CoAuthLocks
Set cals = ActiveDocument.Range.Locks
Add
Retorna um objeto CoAuthLock que representa um bloqueio adicionado a um intervalo especificado.
O exemplo de código a seguir adiciona um bloqueio de reserva ao primeiro parágrafo do documento ativo.
ActiveDocument.CoAuthoring.Locks.Add(ActiveDocument.Paragraphs(1).Range, wdLockReservation)
Arguments
Optional arguments
Os seguintes argumentos são opcionais
Range (Range) - Especifica o intervalo de documentos bloqueado pelo objeto CoAuthLock . Este parâmetro pode ser um objeto Paragraph, Column, Cell, Row, Table, Range ou Selection.
Type (WdLockType) - Especifica o tipo de bloqueio. O WdLockType especificado só pode ser wdLockEphemeral ou WdLockReservation.
Os valores possíveis são
| wdLockChanged | Especifica um bloqueio de espaço reservado. Um bloqueio de espaço reservado indica que outro usuário removeu o bloqueio do intervalo, mas o usuário atual não atualizou o modo de exibição do documento salvando. |
| wdLockEphemeral | Especifica um bloqueio efêmero. O Word coloca implicitamente um bloqueio efêmero em um intervalo quando um usuário começa a editar um intervalo em um documento com a coautoria habilitada. |
| wdLockNone | Reservado para uso futuro. |
| wdLockReservation | Especifica um bloqueio de reserva. Um bloqueio de reserva explicitamente é criado por um usuário por meio do botão de Autores de bloco na guia revisão no Word. |
Count
Retorna um Long que representa o número de bloqueios na coleção CoAuthLocks . Somente leitura.
MsgBox "The active document contains " & _
ActiveDocument.CoAuthoring.Locks.Count & " locks."
Item
Retorna um objeto CoAuthLock individual em uma coleção.
Item (Index)
Index: O objeto individual a ser retornado.
Dim cal As CoAuthLock
Set cal = ActiveDocument.Range.Locks(Index:=1)
RemoveEphemeralLocks
Remove do documento os bloqueios efêmeros.
Os bloqueios efêmeros são automaticamente aplicados a um intervalo quando um coautor começa a editar um documento que está com a coautoria habilitada.
ActiveDocument.CoAuthoring.Locks.RemoveEphemeralLocks