Compartilhar via

Método Presentations.CanCheckOut (PowerPoint)

  • Artigo

Retorna True se o Microsoft PowerPoint pode check-out de uma apresentação especificada de um servidor.

Sintaxe

expression. CanCheckOut( _FileName_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
FileName Obrigatório String O caminho do servidor e o nome da apresentação.

Valor de retorno

Booliano

Comentários

Para se beneficiar dos recursos de colaboração incorporados ao PowerPoint, você deverá armazenar apresentações em um servidor Microsoft Office SharePoint Portal.

Exemplo

Este exemplo verifica se não foi feito o check out de uma apresentação por outro usuário, e se ainda pode ser feito. Se o check out puder ser feito na apresentação, esta é copiada para ser editada no computador local.

Sub CheckOutPresentation(strPresentation As String)
    If Presentations.CanCheckOut(strPresentation) = True Then
        Presentations.CheckOut FileName:=strPresentation
    Else
        MsgBox "You are unable to check out this " & _
        "presentation at this time."
    End If
End Sub

Para chamar a sub-rotina acima, use a sub-rotina a seguir e substitua o nome do arquivo " https://servername/workspace/report.ppt por um arquivo real localizado em um servidor mencionado na seção Comentários acima.

Sub CheckPPTOut()
    Call CheckOutPresentation(strPresentation:= _
        "https://servername/workspace/report.doc ")
End Sub

Confira também

Objeto Presentations

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.