通过

Presentations.CanCheckOut 方法 (PowerPoint)

  • 项目

如果 Microsoft PowerPoint 可以签出指定的演示文稿从一台服务器，则返回 True 。

语法

expression。 CanCheckOut( _FileName_ )

表达 一个代表 Presentations 对象的变量。

参数

名称 必需/可选 数据类型 说明
FileName 必需 String 演示文稿的服务器路径和名称。

返回值

布尔值

备注

若要利用 PowerPoint 中内置的协作功能，必须将演示文稿存储在 Microsoft Office SharePoint Portal Server 上。

示例

本示例验证演示文稿是否可以签出且未被其他用户签出。如果演示文稿可以签出，则将演示文稿复制到本地计算机以进行编辑。

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

若要调用上述子例程，请使用以下子例程并将“” https://servername/workspace/report.ppt 文件名替换为位于上述“备注”部分中提到的服务器上的实际文件。

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

另请参阅

演示文稿对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。