次の方法で共有


Sync.LastSyncTime プロパティ (Office)

アクティブ ドキュメントのローカル コピーがサーバー コピーと最後に同期された日時を取得します。 読み取り専用です。

注:

Microsoft Office 2010 以降、このオブジェクトまたはメンバーは推奨されていないため、使用しないでください。

構文

LastSyncTime

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

注釈

LastSyncTime プロパティを参照して、作業中の文書のローカル コピーがサーバー側のコピーを最後に同期された時間が経過したを確認します。 ローカル コピーとサーバー側のコピーが同期するかどうかを判断するのには、 Status プロパティを確認します。

ローカル コピーとサーバー コピー間の同期の作業中の文書が構成されていない場合、 LastSyncTime プロパティは、実行時エラーを発生させます。

次の使用例は、LastSyncTime の日時から 24 時間以上が経過している場合に、同期状態と併せて警告メッセージを表示します。

    Dim objSync As Office.Sync 
    Dim dtmLastSync As Date 
    Dim strStatus As String 
    Set objSync = ActiveDocument.Sync 
    dtmLastSync = CDate(objSync.LastSyncTime) 
    If DateDiff("h", dtmLastSync, Now) > 24 Then 
        strStatus = "Document has not been synced " & _ 
            " within the last 24 hours." & vbCrLf & _ 
            "Document status: " & objSync.Status 
        MsgBox strStatus, vbInformation + vbOKOnly, "Error Information" 
    End If 
    Set objSync = Nothing 

関連項目

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

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