Compartilhar via


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

expressão. CheckIn (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 Variantes Comentários para a versão do documento que está sendo armazenada temporariamente (válido somente se SaveChanges for True).
MakePublic 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 puder, ele salvará e fechará o documento e o verificará 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 do 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.