xlsmとxlsのマクロについて

質問

こんにちは

今まで動いていたxlsのマクロをxlsmに
バージョンアップさせたところ不具合が起きましたので質問させていただきます。

ファイルの概要（すべてマクロによる処理）
(1)　ファイルを開いたときに，読み取り専用で開く
　　ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly

(2)　シートの特定の箇所を変更

(3)　読み取り専用を解除し上書き保存
　　ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite
　　ActiveWorkbook.Save

xlsmのファイルでは読み取り専用を解除すると，
変更されたファイルというボックスが表示されます。
'ファイル名'を変更しました。
別の人も変更を加えました。どのように処理しますか。
破棄　保存　キャンセル

どのようにマクロを設定すればこのボックスを表示せず，
上書き保存をすることができますでしょうか。

よろしくお願いします。

回答No.1

real beatin（@realbeatin）

こんにちは。

全体としてどういったことを意図されてのご質問なのか、
こちらの理解が至っている訳ではありませんので、
部分的な要求に一般論としてお応えするだけで、
提示するものが適切な解決策となり得るか確証は持てていませんが。

> どのようにマクロを設定すればこのボックスを表示せず，
> 上書き保存をすることができますでしょうか。
部分的な答えとしては、
>　　ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite
>　　ActiveWorkbook.Save
を
　　ActiveWorkbook.Saved = True
　　ActiveWorkbook.ChangeFileAccess Mode:=xlReadWrite
　　ActiveWorkbook.Save
のように一行追加すればダイアログは表示されずに上書きができます。

もし、何か不足がある場合は
　ActiveWorkbookとは、他ブックのことなのか／自ブックのことなのか
　上書き保存した後のブックはどうする（閉じる／読み取り専用に戻す）のか
といった情報と共に一連の処理全体が具体的にイメージできる内容で
補足欄にでも書いてみて下さい。

とりあえず以上です。