保存時にバックアップファイルが作成されるかどうかを確認(CreateBackup プロパティ)
バックアップファイルが作成されるかどうかを確認
CreateBackup プロパティ で、ブック保存時に、バックアップファイル(.xlk)が自動的に作成される設定になっているかどうかを確認することができます。値の取得のみ可能です。
object.CreateBackup
引数・戻り値
- object ・・・ 対象となる Application オブジェクトを指定します。
- 戻り値 ・・・ ブール型(Boolean)の値を使用します。True の場合、ブック保存時にバックアップファイル(拡張子 .xlk)を作成します。
バックアップファイルを作成するには、SaveAs メソッド の引数 createbackup に、True を指定します( ブックを別名で保存(SaveAs メソッド) を参照)。
- object ・・・ 対象となる Application オブジェクトを指定します。
- 戻り値 ・・・ ブール型(Boolean)の値を使用します。True の場合、ブック保存時にバックアップファイル(拡張子 .xlk)を作成します。
バックアップファイルを作成するには、SaveAs メソッド の引数 createbackup に、True を指定します( ブックを別名で保存(SaveAs メソッド) を参照)。
CreateBackup プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub Sample_CreateBackup() '確認画面を表示しないように設定 Application.DisplayAlerts = False 'ブックを保存し、バックアップファイルを作成 ActiveWorkbook.SaveAs CreateBackup:=True '確認画面を表示するように設定 Application.DisplayAlerts = True 'バックアップファイルを作成されるかどうかを確認 MsgBox ActiveWorkbook.CreateBackup End Sub |
実行結果
Sub Sample_CreateBackup() 実行前

Sub Sample_CreateBackup() を実行

Sub Sample_CreateBackup() 実行後

関連記事
-
-
行列番号を含めて印刷(PageSetup.PrintHeadings プロパティ)
PageSetup.PrintHeadings プロパティ PageSetup. …
-
-
イベントの発生・無効をコントロール(EnableEvents プロパティ)
EnableEvents プロパティ EnableEvents プロパティに T …
-
-
白黒印刷(PageSetup.BlackAndWhite プロパティ)
PageSetup.BlackAndWhite プロパティ PageSetup. …
-
-
印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
-
印刷設定(偶数ページのヘッダー・フッターを設定)OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
新しいウィンドウを開く(NewWindow メソッド)
NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …
-
-
印刷・印刷プレビュー(PrintOut メソッド、PrintPreview メソッド)
PrintOut メソッド 印刷するには、PrintOut メソッド を使用しま …
-
-
ウィンドウの分割(Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ)
ウィンドウの分割と解除 ウィンドウ(ワークシート画面)を分割するには、Split …
-
-
印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …
- PREV
- 別のブックのマクロを実行(Run メソッド)
- NEXT
- Excel を終了する(Quit メソッド)