Excel VBAでオートメーションエラーがでる

解決済

質問者：cocoku
質問日時：2007/11/26 17:02
回答数：1件

いつもお世話になっております。

Sheets("修正シート").Select
Application.DisplayAlerts = False
ActiveSheet.Delete
Application.DisplayAlerts = True
Sheets("箇所見る").Select
Range("A1").Select

上記のところで実行エラー　オートメーションエラーです。
とメッセージがでます。
何がいけないのでしょうか？
よろしくお願い致します。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (1件)

No.1ベストアンサー

回答者： hana-hana3
回答日時：2007/11/26 18:32

シートモジュールに書いていませんか？

シートが削除された瞬間に実行中のマクロが消滅するので、以後の構文は実行不可能になります。

標準モジュールに記述して下さい。

この回答への補足

そうです。シートモジュールに記入しています。
しかしながら、sheet1に記入してsheet2を削除するので関係ないのでは・・・。
具体的には、sheet1をコピーしてsheet1(2)を修正シートと変更して
そのシートを削除するのですが・・・。
sheet1のコードもコピーされていますので、実際実行されるのは修正シートと言うことになりますか？？？！
ためしてみます。

補足日時：2007/11/27 00:23

通報する