Document.CheckIn メソッド (Visio)

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

構文

式。チェックイン (SaveChanges、 Comments、 MakePublic)

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

パラメーター

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

戻り値

なし

解説

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

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

例

次の使用例は、指定した文書をチェックインできるかどうかをサーバーに確認します。 可能な場合、この例では文書を保存して閉じ、サーバーにチェックインし直します。

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 のサポートおよびフィードバックを参照してください。

  • Last updated on