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 Variant 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 ser, guarda e fecha o documento e verifica-o 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 subroutina CheckInOut, utilize a seguinte subroutina e substitua "https://servername/workspace/report.doc" com o nome de ficheiro de um ficheiro real localizado no servidor mencionado anteriormente na secção Observações.

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.

  • Last updated on