Project.IsCheckoutOSVisible 属性 (Project)

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

语法

expressionIsCheckoutOSVisible

表达 一个代表 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。