Méthode Document.CheckInWithVersion (Word)
Enregistre un document depuis un ordinateur local vers un serveur et définit le document local en lecture seule afin qu’il ne puisse être modifié localement.
Syntaxe
expression. CheckInWithVersion( _SaveChanges_ , _Comments_ , _MakePublic_ , _VersionType_ )
Expression Variable qui représente un objet Document .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| SaveChanges | Facultatif | Boolean | Cette valeur est définie sur True pour enregistrer le document sur un emplacement du serveur. La valeur par défaut est True. |
| Comments | Facultatif | Variant | Représente les commentaires de révision du document en cours d’archivage (valable uniquement si l’argument SaveChanges est défini sur True). |
| MakePublic | Facultatif | Boolean | Cette valeur est définie sur True pour permettre à l’utilisateur de publier le document après son archivage. |
| VersionType | Facultatif | Variant | Fournit les informations de version se rapportant au document. |
Remarques
Si le paramètre MakePublic (Rendre public) est défini sur True, le document est soumis au processus d’approbation, ce qui peut aboutir à la publication d’une version en lecture seule du document (valable uniquement si la valeur de l’argument SaveChangesest définie sur True).
Vous ne pouvez tirer profit des outils de travail collaboratif intégrés dans Microsoft Word que si vos documents sont stockés sur un serveur Microsoft SharePoint Server.
Exemple
L’exemple suivant utilise la méthode CanCheckin pour déterminer si le document a été stocké sur un serveur Microsoft SharePoint Server. Si le document a été stocké sur un serveur, la méthode CheckInWithVersion est appelée pour archiver le document, ainsi que les commentaires et le numéro de version, enregistrer les modifications sur un emplacement du serveur et soumettre le document au processus d’approbation.
Cet exemple est destiné à une personnalisation au niveau du document.
Private Sub DocumentCheckIn()
If ActiveDocument.CanCheckin Then
ActiveDocument.CheckInWithVersion _
True, _
"My updates.", _
True, _
WdCheckInVersionType.wdCheckInMinorVersion
Else
MessageBox.Show ("This document cannot be checked in")
End If
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.