Workbook.CheckInWithVersion 方法 (Excel)

将工作簿从本地计算机保存到服务器，并将本地工作簿设置为只读，以便无法在本地编辑。

语法

表达式。CheckInWithVersion (SaveChanges、 Comments、 MakePublic、 VersionType)

表达 一个返回 Workbook 对象的变量。

参数

名称	必需/可选	数据类型	说明
SaveChanges	可选	Variant	如果为 True，将工作簿保存到服务器位置。 默认值为 True 。
Comments	可选	Variant	正签入的工作簿的修订批注（仅在 SaveChanges 设置为 True 时适用）。
MakePublic	可选	Variant	True 允许用户在签入工作簿后发布工作簿。
VersionType	可选	Variant	指定工作簿的版本信息。

返回值

Nothing

备注

将 MakePublic 参数设置为 True，将把工作簿提交至审批过程，审批过程可最终生成发布给用户的工作簿版本，用户对该版本的工作簿拥有只读权限（仅在 SaveChanges 设置为 True 时适用）。

要利用 Microsoft Excel 中内置的协作功能，文档必须存储在 Microsoft SharePoint Server 上。

示例

以下示例使用 CanCheckIn 方法确定工作簿是否已存储在 Microsoft SharePoint Server 上。 如果工作簿已经存储在服务器上，该示例调用 CheckInWithVersion 方法将工作簿连同指定的批注和版本号一起签入、将更改保存到服务器位置，并提交工作簿进入审批过程。

此示例针对工作簿级的自定义。

Private Sub WorkbookCheckIn() 
  If ThisWorkbook.CanCheckIn Then 
    ThisWorkbook.CheckInWithVersion True, "Changed sheet 1 and 2 etc...", True, XlCheckInVersionType.xlCheckInMinorVersion 
  Else 
    Msgbox "This workbook cannot be checked in"
  End If 
End Sub

支持和反馈

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