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 Presentation .
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 | Variantes | 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 a apresentação especificada pode ser verificada e, se for o caso, fecha a apresentação e verifica-a novamente 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 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 CheckInPresentation()
Call CheckInPresentation(strPresentation:= "https://servername/workspace/report.ppt ")
End Sub
Confira também
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.