Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ブックの変更が保存されているかを確認する（Saved プロパティ）

2015/12/01

ブックの変更が保存されているかを確認する（Saved プロパティ）

Saved プロパティ は、ブックの変更が保存されたかどうかを確認することができます。ブックを変更した後に保存した場合は、True を返します。

【書式】

＜取得＞
object.Saved

＜設定＞
object.Saved = boolean

引数・戻り値

object ・・・対象となる Workbook オブジェクトを指定します。
boolean ・・・ True を指定するとブックは変更されていないことになります。False を指定するとブックは変更されたことになります。

ブックを変更後、保存しないで終了する場合、Saved プロパティ に、True を指定してから、Close メソッド を実行すると、保存するかどうかを確認するダイアログボックスを表示しません。
（例）ブック変更後、保存せず、確認ダイアログボックスも表示しないで終了
　ActiveSheet.Range(“A1”).Value = 200
　ActiveWorkbook.Saved = True
　ActiveWorkbook.Close

Saved プロパティ使用例

サンプルVBAソース

　
Sub Sample_Saved()

    Dim msg As String
    
    'ブックを変更して保存
    ActiveSheet.Range("A1").Value = 200
    ActiveWorkbook.Save
        
    'ブックの変更を保存したかどうかを確認
    If ActiveWorkbook.Saved = True Then
        
        msg = "変更を保存しました。"
    
    Else
    
        msg = "変更は保存されていません。"
    
    End If
    
    MsgBox msg

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

　

Sub Sample_Saved()

Dim msg As String

'ブックを変更して保存

ActiveSheet.Range("A1").Value = 200

ActiveWorkbook.Save

'ブックの変更を保存したかどうかを確認

If ActiveWorkbook.Saved = True Then

msg = "変更を保存しました。"

Else

msg = "変更は保存されていません。"

End If

MsgBox msg

End Sub

　

実行結果

- ブック・シートの操作 Saved プロパティ, VBA基本, Workbook オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウの分割と解除ウィンドウ（ワークシート画面）を分割するには、Split …

: 別のブックのマクロを実行（Run メソッド）

別のブックのマクロを実行別のブックのマクロを実行するには、Run メソッドを …

: 0 を表示するかどうかを設定（DisplayZeros プロパティ）

DisplayZeros プロパティ DisplayZeros プロパティに、T …

: アクティブプリンタを変更（ActivePrinter プロパティ）

ActivePrinter プロパティ ActivePrinter プロパティを …

: ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）

Paste メソッド指定したワークシート上にクリップボードのデータを貼り付けま …

: 画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）

画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …

: 数式バーの設定（DisplayFormulaBar, FormulaBarHeight）

数式バーの設定数式バーの表示・非表示の設定を行うには、DisplayFormu …

: シートが保護されているか確認（ProtectContents プロパティ）

ProtectContents プロパティワークシートが保護されているかどうか …

: 指定された情報をブックから削除（RemoveDocumentInformation メソッド）

RemoveDocumentInformation メソッド指定された種類の情 …

: 印刷範囲の設定・解除（PageSetup.PrintArea プロパティ）

PageSetup.PrintArea プロパティ印刷範囲を設定するには、Pa …

PREV: ブックのファイル形式を調べる（FileFormat プロパティ）
NEXT: ブックのパスを取得（FullName プロパティ,Path プロパティ）