Project.IsCheckoutOSVisible 屬性 (Project)
取得 Backstage 檢視中是否顯示 [ 取出 ] 按鈕。 唯讀的 Boolean。
語法
expression。 IsCheckoutOSVisible
表達 代表 Project 物件的變數。
註解
如果未取出使用中專案,Backstage 檢視會顯示 [ 取出] 按鈕。 如果 Backstage 檢視中顯示 [取出] 按鈕,則 IsCheckoutOSVisible屬性為True;否則為False。
範例
下列範例會測試是否顯示結帳訊息列;如果是,則會隱藏訊息列。 不過,如果專案未取出,backstage 檢視仍會顯示 [取出] 按鈕,因此範例可以嘗試取出專案。 如果專案由您取出或取出給其他人,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 支援與意見反應。