Classe CoAuthLocks (Word VBA)
Collection d’objets CoAuthLock . Pour utiliser une variable de classe CoAuthLocks, elle doit d'abord être instanciée, par exemple
Dim cals as CoAuthLocks
Set cals = ActiveDocument.Range.Locks
Add
Renvoie un objet CoAuthLock qui représente un verrou ajouté à une plage spécifiée.
L’exemple de code suivant ajoute un verrou de réservation au premier paragraphe du document actif.
ActiveDocument.CoAuthoring.Locks.Add(ActiveDocument.Paragraphs(1).Range, wdLockReservation)
Arguments
Optional arguments
Les arguments suivants sont facultatifs
Range (Range) - Spécifie la plage de documents verrouillée par l’objet CoAuthLock .
Type (WdLockType) - Spécifie le type de verrou.
Valeurs possibles sont
| wdLockChanged | Spécifie un verrou d'espace réservé. |
| wdLockEphemeral | Spécifie un verrou éphémère. |
| wdLockNone | Réservé à une utilisation ultérieure. |
| wdLockReservation | Spécifie un verrou de réservation. |
Count
Renvoie un type long qui représente le nombre de verrous dans la collection CoAuthLocks .
MsgBox "The active document contains " & _
ActiveDocument.CoAuthoring.Locks.Count & " locks."
Item
Renvoie un objet CoAuthLock spécifique appartenant à une collection.
Item (Index)
Index: Objet spécifique qui doit être renvoyé.
Dim cal As CoAuthLock
Set cal = ActiveDocument.Range.Locks(Index:=1)
RemoveEphemeralLocks
Supprime les verrous éphémères du document.
Les verrous éphémères sont appliqués automatiquement à une plage lorsqu’un co-auteur commence à modifier un document pour lequel la co-édition est activée.
ActiveDocument.CoAuthoring.Locks.RemoveEphemeralLocks