Propriedade Project.IsCheckoutOSVisible (Project)

Obtém se o botão Check Out está visível na exibição Backstage. Boolean somente leitura.

Sintaxe

expression. IsCheckoutOSVisible

Expressão Uma variável que representa um objeto Project .

Comentários

Se o projeto ativo não for verificado, o modo de exibição De bastidores mostrará um botão Check Out . A propriedade IsCheckoutOSVisible é True se o botão Check Out estiver visível na exibição Backstage; caso contrário, False.

Exemplo

O exemplo a seguir testa se a barra de mensagens de checkout está visível; Se assim for, ele oculta a barra de mensagens. No entanto, se o projeto não for verificado, o modo de exibição de bastidores ainda mostrará o botão Check Out, para que o exemplo possa tentar verificar o projeto. Se o projeto for verificado por você ou feito check-out para outra pessoa, o Project mostrará uma caixa de diálogo de erro com a mensagem: "Este projeto já está verificado em um computador diferente ou sessão do 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

Valor de propriedade

BOOL

Confira também

Objeto Project

Método IsCheckoutMsgBarVisibleHideCheckoutMsgBar MétodoCheckoutProject

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.