Método Document.CheckIn (Word)

Retorna um documento de um computador local para um servidor e define o documento local como somente leitura de forma ele não possa ser editado localmente.

Sintaxe

mais simples. Check-in (SaveChanges, Comments, MakePublic)

expressão Obrigatório. Uma variável que representa um objeto Document.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
SaveChanges Opcional Boolean True salva o documento para o local do servidor. O padrão é True.
Comments Opcional Variant Comentários para a versão do documento que está sendo armazenada temporariamente (válido somente se SaveChanges for True).
Torná-Pública Opcional Boolean True permite ao usuário efetuar uma publicação no documento após o check-in. Assim, o documento é enviado para processo de aprovação, que resultará em uma versão do documento publicada para usuários com direitos somente leitura no documento (válido somente se SaveChanges for True). O padrão é False.

Comentários

Para aproveitar os recursos de colaboração internos do Microsoft Word, os documentos precisam ser armazenados em um Microsoft SharePoint Portal Server.

Exemplo

Esse exemplo verifica o servidor para ver se o documento especificado pode ser verificado. Se possível, ele salva e fecha o documento e o verifica novamente no servidor.

Sub CheckInOut(docCheckIn As String) 
 If Documents(docCheckIn).CanCheckin = True Then 
 Documents(docCheckIn).CheckIn 
 MsgBox docCheckIn & " has been checked in." 
 Else 
 MsgBox "This file cannot be checked in " & 
 "at this time. Please try again later." 
 End If 
End Sub

Para chamar a sub-rotina CheckInOut, use a sub-rotina a seguir e substitua "https://servername/workspace/report.doc" com o nome de arquivo de um arquivo real localizado no servidor mencionado na seção Comentários anteriormente.

Sub CheckDocInOut() 
 Call CheckInOut (docCheckIn:="https://servername/workspace/report.doc") 
End Sub

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.