如果 Microsoft PowerPoint 可以存回指定的簡報的伺服器會傳回 True 。
語法
expression。 CanCheckIn
運算式 代表 Presentation 物件的變數。
傳回值
布林值
註解
若要利用 PowerPoint 內建的共同作業功能,您必須將簡報儲存在 Microsoft SharePoint Portal Server 上。
範例
此範例會檢查伺服器,以查看是否可以簽入指定的簡報,如果可以,則關閉簡報並將其簽入回伺服器。
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
若要呼叫上述子程式,請使用下列子程式,並將 “ https://servername/workspace/report.ppt ” 檔案名稱取代為位於上述「備註」一節中提到的伺服器上的實際檔案。
Sub CheckPPTIn()
Call CheckInPresentation(strPresentation:= _
"https://servername/workspace/report.ppt ")
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。