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

関連記事

: スクロール範囲を限定（ScrollArea プロパティ）

ScrollArea プロパティ ScrollArea プロパティにセル範囲を …

: ブックのパスを取得（FullName プロパティ,Path プロパティ）

FullName プロパティ・Path プロパティブックのパス（保存場所）を調 …

: 前後のワークシートを参照する（Previous プロパティ,Next プロパティ)

Previous プロパティ指定したシートの前（左側）のシートを参照します。 …

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

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

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

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

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

PageSetup.FirstPageNumber プロパティ PageSetu …

: ワークシートをアクティブにする・選択する（Activate, Select）

Activate メソッド・Select メソッド Activate メソッドは …

: 印刷のページ区切り（DisplayPageBreaks プロパティ）

DisplayPageBreaks プロパティ印刷したあとや印刷プレビューを表 …

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

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

: 印刷位置を中央に設定（CenterHorizontally, CenterVertically）

PageSetup.CenterHorizontally プロパティ PageS …

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