Méthode Documents.CheckOut (Visio)

Article
04/07/2023

Marque un document spécifié comme extrait et attribue des privilèges de modification à l’utilisateur actuel.

Syntaxe

expression. CheckOut (FileName)

Expression Variable qui représente un objet Documents .

Parameters

Nom	Requis/Facultatif	Type de données	Description
FileName	Obligatoire	String	Chemin du serveur et nom du fichier.

Valeur renvoyée

Aucune

Remarques

Pour extraire un fichier, celui-ci doit être stocké dans une bibliothèque de documents sur un ordinateur exécutant Microsoft SharePoint Server ou Microsoft SharePoint Foundation.

Contrairement au comportement dans l’interface utilisateur, la méthode CheckOut n’ouvre pas le document. Utilisez la méthode Open pour ouvrir le document dans une fenêtre de dessin après l’avoir extrait.

Exemple

Cet exemple vérifie qu’un document peut être extrait. Si c’est le cas, cet exemple l’extrait ; dans le cas contraire, il renvoie un message indiquant que le document ne peut être extrait.

 
Sub CheckDocOut(strDocCheckOut As String)  
    If Documents.CanCheckOut(strDocCheckOut) = True Then  
        Documents.CheckOut strDocCheckOut  
    Else  
        MsgBox "You are unable to check out this document " _  
            & "at this time."  
    End If    
End Sub

Pour appeler la sous-routine CheckDocOut précédente, utilisez la sous-routine suivante et remplacez nomserveur/espacetravail/dessin.vdx par le chemin d’accès et le nom d’un fichier existant situé sur un ordinateur Microsoft SharePoint Server.

 
Sub DocOut()  
    Call CheckDocOut _  
        (strDocCheckOut:="https://servername/workspace/drawing.vdx ")  
End Sub

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.

Partager via