Excel VBA質問箱 IV

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

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


40543 / 76732 ←次へ | 前へ→

【41286】Re:動作速度について
回答  Hirofumi  - 06/8/3(木) 20:17 -

引用なし
パスワード
   善く見ていないのでハッキリ解りませんが?
此れて、同じセルに40回づつ同じ代入を繰り返している様な気がしますが?
また、

  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 質問
【41279】Re:動作速度について neptune 06/8/3(木) 17:09 発言
【41280】Re:動作速度について Jaka 06/8/3(木) 17:15 発言
【41281】Re:動作速度について てっちゃん 06/8/3(木) 17:30 お礼
【41283】Re:動作速度について neptune 06/8/3(木) 19:17 発言
【41286】Re:動作速度について Hirofumi 06/8/3(木) 20:17 回答
【41288】Re:動作速度について Hirofumi 06/8/3(木) 21:15 回答
【41319】Re:動作速度について Hirofumi 06/8/4(金) 19:24 回答
【41328】Re:動作速度について てっちゃん 06/8/6(日) 8:57 発言
【41341】Re:動作速度について Hirofumi 06/8/6(日) 23:02 回答
【41377】Re:動作速度について てっちゃん 06/8/8(火) 7:59 お礼
【41298】Re:動作速度について Jaka 06/8/4(金) 9:15 発言
【41327】Re:動作速度について てっちゃん 06/8/6(日) 8:52 お礼

40543 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free