Table of contents
TOC
Collapse the table of content
Expand the table of content

Presentations.CheckOut Method (PowerPoint)

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

Copies a specified presentation from a server to a local computer for editing. Returns a String that represents the local path and file name of the presentation checked out.

Syntax

expression. CheckOut( FileName )

expression A variable that represents a Presentations object.

Parameters

NameRequired/OptionalData TypeDescription
FileNameRequiredStringThe server path and name of the presentation.

Return Value

Nothing

Remarks

To take advantage of the collaboration features built into Microsoft PowerPoint, presentations must be stored on a Microsoft Office SharePoint Portal Server.

Example

This example verifies that a presentation is not checked out by another user and that it can be checked out. If the presentation can be checked out, it copies the presentation to the local computer for editing.

Sub CheckOutPresentation(strPresentation As String)

    Dim strFileName As String

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

To call the subroutine above, use the following subroutine and replace the "http://servername/workspace/report.ppt" file name for an actual file located on a server mentioned in the Remarks section above.

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

See also

Concepts

Presentations Object

© 2018 Microsoft