Excel一定時間ごとに上書保存するマクロ

質問

エクセルで、一定時間ごと(例えば５分に一回)に上書き保存を行うマクロを組みたいとおもっております。

エクセルの１セルに、上書き保存を行うと、最終保存時間を表示できるように設定しているのですが、
自動バックアップ等でなく、一定間隔で自動で「上書き保存」を行えるマクロを組みたいと思っています。

使い方としては、該当のエクセルをスタートアップにいれ、自動起動させる。⇒エクセルが開いたら自動でマクロ起動　⇒　自動で上書き保存マクロが実行され、最終保存日時が更新される。という流れとしたいです。

どなたか、お教え願えませんでしょうか。
よろしくお願い致します。

回答No.1

keithin · ベストアンサー

ＡＬＴ＋Ｆ１１でＶＢＥ画面を開く
挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける

sub Auto_Open()
macro1
end sub

sub macro1()
thisworkbook.save
application.ontime now + timeserial(0, 5, 0), "macro1"
end sub

ブックを保存して閉じる

ブックを開くと５分ごとに保存を繰り返す。

お礼

有難うございます！
無事できました！