DocumentLibraryVersions オブジェクト (Office)

Microsoft Word の Document オブジェクト、Excel の Workbook オブジェクト、および PowerPoint の Presentation オブジェクトの DocumentLibraryVersions プロパティは、DocumentLibraryVersions オブジェクトを返します。 DocumentLibraryVersions オブジェクトは、DocumentLibraryVersion オブジェクトのコレクションを表します。

注釈

サーバー上の SharePoint ドキュメント ライブラリに保存されているドキュメントで DocumentLibraryVersions オブジェクトを使用して、アクティブなドキュメントのバージョン管理が有効になっているかどうかを確認し、バージョン管理が有効になっている場合は、ドキュメントの DocumentLibraryVersion オブジェクトのコレクションを管理します。

各 DocumentLibraryVersion オブジェクトは、アクティブなドキュメントの 1 つの保存されたバージョンを表します。 バージョン管理を有効にすると、次のアクションが発生したときに、サーバー上に新しいバージョンが作成されます。開いているドキュメントの変更をユーザーが保存するたびに、追加のバージョンが作成されるわけではありません。

  • チェックイン
  • 保存: ユーザーがドキュメントを開いた後に初めて保存すると、サーバー上に新しいバージョンが作成されます。 ドキュメントを開いている間にさらに変更を保存した場合は、同じバージョンに対して保存が適用されます。
  • 復元
  • アップロード

DocumentLibraryVersions オブジェクト モデルは、バージョン管理を有効または作業中の文書で無効にするかどうかに使用可能です。 アクティブなドキュメントがドキュメント ライブラリに保存されていない場合、またはバージョン管理が有効になっていない場合、Document、Workbook、および Presentation オブジェクトの DocumentLibraryVersions プロパティは Nothing を返しません。 IsVersioningEnabled プロパティを使用すると、ドキュメントが Web サイトで編集されるたびにバックアップ コピーまたはバージョンを保存するようにドキュメント ライブラリが構成されているかどうかを確認できます。

例

次の例では、アクティブなドキュメントでバージョン管理が有効になっているかどうかを確認し、有効になっている場合は、保存されている各バージョンに関する情報を表示します。

Dim dlvVersions As Office.DocumentLibraryVersions 
 Dim dlvVersion As Office.DocumentLibraryVersion 
 Dim strVersionInfo As String 
 Set dlvVersions = ActiveDocument.DocumentLibraryVersions 
 If dlvVersions.IsVersioningEnabled Then 
 strVersionInfo = "This document has " & _ 
 dlvVersions.Count & " versions: " & vbCrLf 
 For Each dlvVersion In dlvVersions 
 strVersionInfo = strVersionInfo & _ 
 " - Version #: " & dlvVersion.Index & vbCrLf & _ 
 " - Modified by: " & dlvVersion.ModifiedBy & vbCrLf & _ 
 " - Modified on: " & dlvVersion.Modified & vbCrLf & _ 
 " - Comments: " & dlvVersion.Comments & vbCrLf 
 Next 
 Else 
 strVersionInfo = "Versioning not enabled for this document." 
 End If 
 MsgBox strVersionInfo, vbInformation + vbOKOnly, "Version Information" 
 Set dlvVersion = Nothing 
 Set dlvVersions = Nothing

関連項目

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

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

  • Last updated on