|
何度も何度もすみません。
ファイル作成は着々と進みつつあるのですが、また問題が出てしまいました。
よろしくお願いします。
ワークブックを終わらせるときに下記のコードを書いてオートシェイプに登録しているのですが、
Sub owaru()
Application.DisplayAlerts = True
ActiveWorkbook.Close
End Sub
その時必ず下記のようなエラーが出てしまいます。
----------------------------------------------
問題が発生したため、Microsoft Office Excel を終了します。 ご不便をおかけして申し訳ありません。
この報告に含まれるデータの参照:
AppName: excel.exe AppVer: 12.0.6341.5001 AppStamp:49a5e049
ModName: excel.exe ModVer: 12.0.6341.5001 ModStamp:49a5e049
fDebug:0 Offset.00c4f03b
----------------------------------------------
メニューから終わるとエラーが出ないので、私の書いたコードがまずいのかもしれませんが、多くのサイトに載っているコードでこれ自体間違ってるとは思えないのです。あと、エラーメッセージが出るもののちゃんと保存もされています(保存するを押した場合)
Application.DisplayAlerts = True を抜いてみたり、
ActiveをThis にしたりしてもダメでした(そういう問題ではない?)
原因と回避方法をお教えいただけませんでしょうか。
|
|