Word) (Document.CanCheckin 方法
True 是表示 如果 Microsoft Word 可以存回指定的文件的伺服器。 可讀寫的 Boolean。
語法
expression. CanCheckin
需要 expression。 代表 Document 物件的變數。
傳回值
布林值
註解
若要運用 Word 內建的共同作業功能,您就必須將文件存放在 Microsoft SharePoint Portal Server 上。
範例
此範例會檢查伺服器,以查看是否可以存回指定的檔,如果可以,請關閉檔,然後將它檢查回伺服器。
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
若要呼叫上述 CheckInOut 副程式,請使用下列副程式並取代 「 https://servername/workspace/report.doc" ;檔案名,其實際檔案位於上述一節所述的伺服器上。
Sub CheckDocInOut()
Call CheckInOut (docCheckIn:="https://servername/workspace/report.doc")
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。