Document.CheckIn メソッド (Visio)

ローカル コンピューターから Microsoft SharePoint Server コンピューターにドキュメントを返します。

構文

CheckIn (SaveChangesコメントMakePublic)

Document オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Savechanges 省略可能 Boolean チェックイン前に図面の変更を保存する場合は、True (ゼロ以外)、変更を保存しないで図面をチェックインする場合は、False (0) です。 既定では True です
Comments 省略可能 バリアント型 この改訂番号の図面で保存される注釈です (SaveChangesTrue の場合のみ適用)。
MakePublic 省略可能 Boolean True を指定 すると、チェックイン後にドキュメントが発行されます。 これにより、承認プロセスのドキュメントが送信されるか、ドキュメントの承認ルーティングがない場合は、フォルダーの閲覧者が使用できるパブリック バージョンが作成されます ( SaveChangesTrue の場合にのみ適用されます)。 False を指定 すると、ドキュメントはプライベート表示でのみ使用できます。 既定値は False です。

戻り値

なし

解説

ファイルをチェックインするには、Microsoft SharePoint Server または Microsoft SharePoint Foundation を実行しているコンピューターのドキュメント ライブラリにそのファイルを格納しておく必要があります。

CheckIn メソッドを使用してドキュメントがチェックインされると、ドキュメントは閉じられます。 この動作は、ユーザー インターフェイスとは異なります。ユーザー インターフェイスでドキュメントをチェックインすると、ドキュメントは閉じられ、読み取り専用として再度開かれます。

次の使用例は、指定した文書をチェックインできるかどうかをサーバーに確認します。 可能であれば、この例ではドキュメントを保存して閉じ、それをサーバーにチェックインします。

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

前の CheckDocIn サブルーチンを呼び出すには、次のサブルーチンを使用し、servername/workspace/drawing.vdx を Microsoft SharePoint Server コンピューター上の実際のファイルのパスとファイル名に置き換えます。

Sub DocIn()  
 
    Call CheckDocIn _  
        (varDocCheckIn:="https://servername/workspace/drawing.vdx ") 
  
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。