Ｅｘｃｅｌ２０１０、ユーザーフォームが応答なしになる時の対処方法

Ｅｘｃｅｌ２０１０は、手頃な価格で高機能な表計算ソフトです。
マクロを使用すると、色々な作業を自動化する事ができて、大変便利です。

しかし、マクロを使用してループ処理を行っている時、ユーザーフォームが応答なしになりました。
使用したパソコンは、下記のソフトを使用していました。

ＯＳ　　　　　　　：　Ｗｉｎｄｏｗｓ７（６４ｂｉｔ）
表計算ソフト　　　：　Ｅｘｃｅｌ２０１０（３２ｂｉｔ）

以下、Ｅｘｃｅｌ２０１０、ユーザーフォームが応答なしになる時の対処方法を記載して行きます。

（項目１）
　・マクロを使用してループ処理を行っている時、ユーザーフォームが応答なしになりました。
　・マクロの実行には実害は無かったですが、どうも気になるので対策を検討しました。

　　（正常な状態）　　　　　　　　　　　　　　　（応答なしの状態）
　　　

（項目２）
　・応答なしを回避するには、ループ処理の間に「Repaint+DoEvents」を複数回に１回実行させます。
　・毎回「Repaint+DoEvents」を実行すると、処理速度が落ちますので実行の頻度を減らします。
　・コードは、以下の通りです。１０００回に１回、「Repaint+DoEvents」を実行します。

　　If (i Mod 1000) = 0 Then
　　　UserForm1.Repaint
　　　DoEvents
　　End If

（項目３）
　・以上で、Ｅｘｃｅｌ２０１０、ユーザーフォームが応答なしになる時の対処方法は終了です。