質問: True End Sub ``` ### 試したこと ステップインでは問題ありませんでした
回答: > > 何度か繰り返し処理を行っていると、ランダムで行が非表示になり、正しく値が取得できません。 > > エクセルとパソコンの再起動を行いましたが、変化ありませんでした。 > > もし原因に心当たりがあれば教えていただきたいです・・・ > > >ステップインでは問題ありませんでした > > > 何もしないのに行が非表示になることは考えにくいです。 万が一、行が非表示になったところで、 ただしく値がコピーできないというのも考えにくいです。 ステップインで問題なければ、 単にマシンのパワーが貧弱で、 画面の表示が上手く更新されてないのではないかと推測しますが、 いかがでしょうか? 1回名前を付けて保存してから閉じて、 再度開きなおしたらどうなりますか? あと、もしかしてだけど、 プログラムの最後に Application.ScreenUpdating = True と呪文を書いて改善しますか? それでだめなら、だめもとで、、、 DoEvents Application.ScreenUpdating = True と、、、、 で、だめなら、 DoEvents DoEvents Application.ScreenUpdating = True とか、 DoEvents DoEvents Application.ScreenUpdating = True Application.ScreenUpdating = True ここまでやってだめなら、 違うアプローチが必要かな^^; とにかく思いつく限りを試すしかないかと。。。 最初から画面の更新をとめるとか、 http://officetanaka.net/excel/vba/speed/s1.htm あとは、Sleep関数でちょっと処理を待ってあげるとかかかな。。。 http://officetanaka.net/excel/vba/tips/tips116.htm この辺を参考に、 http://officetanaka.net/excel/vba/speed/ あ、コードについてはほぼ読んでません^^; ステップ実行で問題ないなら、コードに問題はないなら、 VBAの命令が矢継ぎ早にくるので処理が間に合ってないのかなぁと思います。 時間がないのでこの辺ですみません。 あぁ、こつとしは、 http://home.att.ne.jp/zeta/gen/excel/c03p06.htm ↑この辺を参考に、 機能を別々に作って、あとで、その機能を呼び出してあげるようにする。 で、どこで問題が出るのかを根気強く試し、切り分ける。 といいと思います。 う~ん。なかなか言葉でうまく説明できないな^^;