|
▼Jaka さん:
>>一応、希望通りの動作はするのですが、Cells(co1 + 2, 17) = Me.Controls("label" & co1).Captionを各月のif文の場所へ追加した結果、動作の速度がかなり遅くなりました。これって仕方ない事なのでしょうか?
>はい。仕方が無いと思います。
>エクセルVBAは、セルに書きこう処理がとても遅いです。
>それを1個1個何回も書き込むわけですから....。
>まとまった範囲なら配列に入れておいて後で、1活で書き込むといった方あるけど、この場合は無理っぽいです。
>Valueプロパティーは、付けるなら付ける習慣を身に付けた方がいいと思います。
>
>なんなら、
>Application.ScreenUpdating = False
>で、画面描写更新を止めておくと言った方法もありかも。
>Trueに戻すのをお忘れなく。
>使い方をよく把握しないで頻繁に使いすぎると、メッセージボックスの残像が残るとかの副作用もあります。
ありがとうございました。
application.screenupdating=false true 書き込んでいます。
時間がかかる間はメッセージboxに登録中と表示させてがまんします。
|
|