Excel 2010 VBA 終了しない

Question

Win7 64bit OfficePro2010 32bit

Excelでマクロを組み走らせると終了しません。

起動後、3秒～5秒後くらいにキーボードの何かキーを押すと終了します。

XP SP3+2010：3秒程度で終了

XP SP3+2010：3秒程度で終了

Vista+2010：3秒程度で終了

原因がわかる方教えて下さい。

Answer 1

それは、結構でした。

蛇足的な話ですが・・・・

DoEventsはプログラムがCPUを独占して、外部からの割り込みを受け付けなくなるのを防止するもので、どう関係するのか良く分かりませんね。

しかし、おまじないみたいなつもりで入れたら動いたと言う話は結構あるのも事実です。

（個人的にはDoEventsを入れたら急に改善したというのは覚えがないですが）

Answer 2

ループで16回コピペしている場所の

PasteのしたにDoEventsを入れたら動きました。

ありがとうございました。

Answer 3

長い物を全部出してみても、誰もまともに見てくれませんし、「人にデバッグさせるつもりか！」と言われるのが落ちです。

私が申し上げているのは、そういう症状が発生する小さなサンプルコードです。

ただ、そういうものを作るために現物をきり縮めて行くと、どこかで症状が消えたりすることが多く、その過程でご自分で解決してしまうことが多いと思います。

なお、32ビット、64ビットでのVBAと言う意味ではAPI関係を除きここが違うと言う話はききませんね。

Answer 4

y sakudaさんやはりそうですか？

コードはかなり長くそのまま載せれない為

7+64の2010だとなにかロジックに気を付けるところが

あるかと掲載しました。

再度、見直してみます。

簡単に説明すると

同じ表が別ファイルであり、その表の内容に変更があったため

入力済のデータをコピーし、変更後の表に貼りつけることをしています。

各表には小計と合計がある為、コピー範囲をResizeで指定、

又、同じ表が同シート内にある為Offsetでコピー先、貼り付け先を指定し

16回コピペを繰り返しているロジックです。

以上、ありがとうございました。

Answer 5

これだけでは誰にも何にも言えません。

少なくともどんなコードで発生するのか具体的に出してください。

もし、

Sub　XXX（）

Msgbox　"Hel.lo"

End Sub

なんかでもそういう状態でしたら、Excelのトラブルだと思います。

もし、そういう状態でしたらExcelのセーフモードを試し、それで正常化するようなら↓の一連のトラブルシュートをお試しください。

Excel 起動時の問題のトラブルシューティング方法

http://support.microsoft.com/kb/280504/ja

なお、この記事では2007までしか書いてありませんが、基本的には2007と同じです。

ただし、Offce12をOffice14と読み替えてください。