Método Document.CanCheckIn (Visio)

Especifica si se puede proteger un documento en un equipo con Microsoft SharePoint Server.

Sintaxis

expresión. CanCheckIn

Expresión Variable que representa un objeto Document .

Valor devuelto

Booleano

Comentarios

No se puede proteger un archivo que no está desprotegido o no está almacenado en una biblioteca de documentos de un equipo con Microsoft SharePoint Server o Microsoft SharePoint Foundation.

Ejemplo:

En este ejemplo, se comprueba en el servidor si el documento especificado puede protegerse y, si es posible, se protege en el servidor.

 
Sub CheckDocIn (varDocCheckIn As Variant) 
 
 If Documents.Item(varDocCheckIn).CanCheckIn = True Then 
 Documents.Item(varDocCheckIn).CheckIn 
 MsgBox varDocCheckIn & " has been checked in." 
 Else 
 MsgBox "This file cannot be checked in " & _ 
 "at this time. Please try again later." 
 End If 
End Sub

Para llamar a la subrutina CheckDocIn anterior, use la siguiente subrutina y reemplace servername/workspace/drawing.vdx por la ruta de acceso y el nombre de un archivo real ubicado en un equipo con Microsoft SharePoint Server.

 
Sub DocIn() 
 Call CheckDocIn _ 
 (varDocCheckIn:="https://servername/workspace/drawing.vdx ") 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.