Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

40547 / 76736

←次へ　｜　前へ→


	【41286】Re:動作速度について

Hirofumi - 06/8/3(木) 20:17 -


	引用なし

	パスワード

善く見ていないのでハッキリ解りませんが？
此れて、同じセルに４０回づつ同じ代入を繰り返している様な気がしますが？
また、

　　Cells(co, i + cou) = Me.Controls("CheckBox" & i).Value
　　If Me.Controls("CheckBox" & i).Value Then
　　　　Cells(co, i + cou).Value = "○"
　　Else
　　　　Cells(co, i + cou).Value = "×"
　　End If

これも、Cells(co, i + cou)に一度、Me.Controls("CheckBox" & i).Valueを入れ（True、False）
直ぐに、"○"か"×"を入れ直している？

因って、同じセルに都合、79回無駄な代入を繰り返していると思いますよ？
だとしたら、遅くなって当然では無いのですか？

0 hits

▼

【41276】動作速度について てっちゃん 06/8/3(木) 16:42