VBAで多重ループを使って反応なしになる場合の対策

VBAで多重ループを使っていると、重くなって反応なしになってしまう。簡単な対策は、ループの中にDoEventsを挟むだけ。それだけ。

毎回ループ毎にDoEventsを挟むと時間がかかるので、数回に一回ループを挟む形にする。

for i = x to y

    if i mod z = 0 then

        DoEvents

    end if

next i