通过

Project.IsCheckoutOSVisible 属性 (Project)

  • 项目

获取“ 签出 ”按钮在 Backstage 视图中是否可见。 只读 Boolean。

语法

expression。 IsCheckoutOSVisible

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

备注

如果未签出活动项目，则 Backstage 视图将显示“ 签出 ”按钮。 如果“签出”按钮在 Backstage 视图中可见，IsCheckoutOSVisible 属性为 True;否则为 False。

示例

以下示例测试签出消息栏是否可见;如果是，则隐藏消息栏。 但是，如果未签出项目，后台视图仍显示“签出”按钮，因此示例可以尝试签出项目。 如果项目已由你签出或签出给其他人，Project 将显示一个错误对话框，其中包含消息“此项目已在其他计算机或Project Web App会话中签出给你”。

Sub TestBackstageCheckout()
    ' Hide the checkout message bar.
    If ActiveProject.IsCheckoutMsgBarVisible Then
        ActiveProject.HideCheckoutMsgBar
    End If
    
    ' If the Backstage Check Out button is visible, then the
    ' project is not checked out.
    If ActiveProject.IsCheckoutOSVisible Then
        ActiveProject.CheckoutProject
        Debug.Print "Attempted to check out: '" & ActiveProject.Name & "'"
    Else
        Debug.Print "'" & ActiveProject.Name & "' is already checked out."
    End If
End Sub

属性值

BOOL

另请参阅

项目对象

IsCheckoutMsgBarVisibleHideCheckoutMsgBar 方法CheckoutProject 方法

支持和反馈

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