Project.IsCheckoutOSVisible プロパティ (プロジェクト)

[ チェックアウト ] ボタンが 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 のサポートおよびフィードバックを参照してください。

  • Last updated on