Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve True si Microsoft PowerPoint puede proteger una presentación especificada en un servidor.
Sintaxis
expresión. CanCheckIn
expresión Variable que representa un objeto Presentation .
Valor devuelto
Booleano
Comentarios
Para aprovechar las características de colaboración integradas en PowerPoint, las presentaciones se deben guardar en Microsoft SharePoint Portal Server.
Ejemplo
En este ejemplo se comprueba el servidor para ver si la presentación especificada se puede registrar y, si es posible, cierra la presentación y la vuelve a comprobar en el servidor.
Sub CheckInPresentation(strPresentation As String)
If Presentations(strPresentation).CanCheckIn = True Then
Presentations(strPresentation).CheckIn
MsgBox strPresentation & " has been checked in."
Else
MsgBox strPresentation & " cannot be checked in " & _
"at this time. Please try again later."
End If
End Sub
Para llamar a la subrutina anterior, use la subrutina siguiente y reemplace el nombre de archivo " " https://servername/workspace/report.ppt por un archivo real ubicado en un servidor mencionado en la sección Comentarios anterior.
Sub CheckPPTIn()
Call CheckInPresentation(strPresentation:= _
"https://servername/workspace/report.ppt ")
End Sub
Vea también
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.