もっと簡単に済ますには、ループの中に次の一行を入れてみてはどうか。
Application.DoEvents();