CheckOut 方法

返回一个 String 对象，该对象代表一个指定的工作簿，将从服务器签出到本机进行编辑。

expression   必需。该表达式返回“应用于”列表中的对象之一。

FileName   String 类型，必需。要签出的文件名。

示例

本示例验证工作簿没有被其他用户签出，并验证该工作簿是否可以签出。如果工作簿可以签出，本示例将工作簿复制到本机以进行编辑。

Sub UseCheckOut(docCheckOut As String)

    ' Determine if workbook can be checked out.
    If Workbooks.CanCheckOut(docCheckOut) = True Then
        Workbooks.CheckOut docCheckOut
    Else
        MsgBox "Unable to check out this document at this time."
    End If

End Sub