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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: アウトライン記号の表示・非表示（DisplayOutline プロパティ）

アウトライン記号の表示・非表示（DisplayOutline プロパティ） Di …

: 印刷設定（ヘッダー・フッターに画像を設定）Graphic オブジェクト

Graphic オブジェクト Graphic オブジェクトは、ヘッダーおよびフ …

: ブックを保存する（Save メソッド）

ブックを保存する（Save メソッド）既存のブックを上書き保存するには、Sav …

: ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）

ブックが互換モードで開いているか確認する Excel8Compatibility …

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

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

: ステータスバーにメッセージを表示（StatusBar プロパティ）

StatusBar プロパティ StatusBar プロパティで、ステータスバー …

: ワークシートをファイルに保存する（SaveAs メソッド）

SaveAs メソッドワークシートを名前を付けてファイルに保存します。Work …

: 印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）

PageSetup.FirstPageNumber プロパティ PageSetu …

: 新しいウィンドウを開く（NewWindow メソッド）

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

: ウィンドウを拡大・縮小（Zoom プロパティ）

ウィンドウを拡大・縮小（Zoom プロパティ）ウィンドウの表示サイズをパーセン …

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