Saved プロパティ(ActiveX)

未保存の変更がドキュメントに存在するかどうかを指定します。

サポートされているプラットフォーム: Windows のみ

構文と要素

VBA:

object.Saved

object

タイプ: Document

このプロパティが適用されるオブジェクト。

プロパティの値

読み込み専用: はい

タイプ: ブール型

• True: ドキュメントに未保存の変更はありません。
• False: ドキュメントに未保存の変更があります。

注意

追加の注意はありません。

例

VBA:

Sub Example_Saved()
    ' This example checks to see if the current drawing has been modified.
    
    If Not ThisDrawing.Saved Then
        MsgBox "Drawing has been modified! Use the Save or SaveAs method to save the drawing.", , "Saved Example"
    Else
        MsgBox "Drawing has not been modified since the last save.", , "Saved Example"
    End If
    
End Sub

Visual LISP:

(defun c:Example_Saved()
    ;; This example checks to see if the current drawing has been modified.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))

    (if (= (vla-get-Saved doc) :vlax-false)
        (alert "Drawing has been modified! Use the Save or SaveAs method to save the drawing.")
        (alert "Drawing has not been modified since the last save.")
    )
)