通过

Documents.CheckOut 方法 (Visio)

  • 项目

将指定的文档标记为已签出并为当前用户分配编辑权限。

语法

表达式。CheckOut (FileName)

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

参数

名称 必需/可选 数据类型 说明
FileName 必需 字符串 文件的服务器路径和名称。

返回值

Nothing

注解

若要签出文件，则该文件必须存储在运行 Microsoft SharePoint Server 或 Microsoft SharePoint Foundation 的计算机上的文档库中。

与用户界面中的行为不同，CheckOut 方法不会打开文档。 请首先将文档签出，然后使用 Open 方法在绘图窗口中打开该文档。

示例

本示例验证是否可以签出某个文档，如果可以，本示例会将其签出；否则，将返回一条消息，说明不能将该文档签出。

 
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

若要调用前面的 CheckDocOut 子例程，请使用下面的子例程并将 servername/workspace/drawing.vdx 替换为位于 Microsoft SharePoint Server 计算机上的实际文件的路径和名称。

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

支持和反馈

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