Partager via


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

Objet Document

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.