Compartilhar via

Método Presentation.CheckIn (PowerPoint)

Retorna uma apresentação de um computador local para um servidor e define o arquivo local como somente leitura para que ele não possa ser editado localmente.

Sintaxe

expression. CheckIn( _SaveChanges_, _Comments_, _MakePublic_ )

expressão Uma variável que representa um objeto apresentação .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
SaveChanges Opcional Boolean True salva a apresentação até o local do servidor. O valor padrão é False.
Comments Opcional Variant Os comentários da revisão da apresentação cujo check-in está sendo efetuado (válido somente se SaveChanges for True).
MakePublic Opcional Variant True permite que o usuário realize uma publicação da apresentação após o check-in. O documento é submetido para processo de aprovação, o que resultará em uma versão da apresentação publicada apenas para usuários com direitos de somente leitura (válido somente se SaveChanges for True).

Comentários

Para se beneficiar dos recursos de colaboração incorporados ao Microsoft PowerPoint, as apresentações devem ser armazenadas em um Microsoft Office SharePoint Portal Server.

Exemplo

Este exemplo verifica o servidor para ver se é possível dar entrada da apresentação especificada e, em caso afirmativo, fecha a apresentação e volta a dar entrada no servidor.

Sub CheckInPresentation(strPresentation As String)

    If Presentations(strPresentation).CanCheckIn = True Then

        Presentations(strPresentation).CheckIn

        MsgBox strPresentation & " has been checked in."

    Else

        MsgBox strPresentation & " cannot be checked in at this time. Please try again later."

    End If

End Sub

Para chamar a subroutina acima, utilize a seguinte subriretina e substitua o nome de ficheiro " https://servername/workspace/report.ppt " por um ficheiro real localizado num servidor mencionado na secção Observações acima.

Sub CheckInPresentation()

    Call CheckInPresentation(strPresentation:= "https://servername/workspace/report.ppt ")

End Sub

Confira também

Objeto Presentation

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.

  • Last updated on