(Excel) 的 Workbook.CheckIn 方法

從本機電腦將活頁簿傳回伺服器，並將本機的活頁簿設定成唯讀，讓它不能在本機上編輯。 呼叫這個方法也會關閉活頁簿。

語法

運算式。CheckIn (SaveChanges、 Comments、 MakePublic)

表達 代表 Workbook 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
SaveChanges	選用	Variant	True 是表示 儲存變更並檢查文件中。 False 會傳回文件以存回狀態而不儲存修訂。
Comments	選用	Variant	允許使用者為已存回的活頁簿修訂輸入存回註解 (僅適用於 SaveChanges 為 True 時)。
MakePublic	選用	Variant	若為 True，允許使用者在存回後發佈活頁簿。 此動作會送出活頁簿以完成核准程序，這項核准程序最後會產生一個活頁簿版本，並發佈給對活頁簿有唯讀權限的使用者 (僅適用於 SaveChanges 為 True 時)。

範例

本範例會檢查伺服器，確認是否可以存回指定的活頁簿。 如果可以，程式碼會儲存並關閉活頁簿，然後將活頁簿存回伺服器。

Sub CheckInOut(strWkbCheckIn As String) 
 
 ' Determine if workbook can be checked in. 
 If Workbooks(strWkbCheckIn).CanCheckIn = True Then 
 Workbooks(strWkbCheckIn).CheckIn 
 MsgBox strWkbCheckIn & " has been checked in." 
 Else 
 MsgBox "This file cannot be checked in " & _ 
 "at this time. Please try again later." 
 End If 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。