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.