Méthode Presentations.CanCheckOut (PowerPoint)

True si Microsoft PowerPoint peut extraire une présentation donnée à partir d’un serveur.

Syntaxe

expression. CanCheckOut( _FileName_ )

Expression Variable qui représente un objet Presentations .

Parameters

Nom Requis/Facultatif Type de données Description
FileName Obligatoire String Chemin de serveur et nom de la présentation.

Valeur renvoyée

Booléen

Remarques

Pour profiter des fonctionnalités de collaboration intégrées à PowerPoint, les présentations doivent être stockées sur un serveur Microsoft SharePoint Portal.

Exemple

Cet exemple vérifie qu’une présentation n’est pas extraite par un autre utilisateur et qu’elle peut être extraite. Si la présentation peut être extraite, le programme la copie sur l’ordinateur local pour permettre sa modification.

Sub CheckOutPresentation(strPresentation As String)
    If Presentations.CanCheckOut(strPresentation) = True Then
        Presentations.CheckOut FileName:=strPresentation
    Else
        MsgBox "You are unable to check out this " & _
        "presentation at this time."
    End If
End Sub

Pour appeler la sous-routine ci-dessus, utilisez la sous-routine suivante et remplacez le nom de fichier « https://servername/workspace/report.ppt » par un fichier réel situé sur un serveur mentionné dans la section Remarques ci-dessus.

Sub CheckPPTOut()
    Call CheckOutPresentation(strPresentation:= _
        "https://servername/workspace/report.doc ")
End Sub

Voir aussi

Objet Presentations

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.