アカウント名:
パスワード:
ループ内にDoEventsを入れてみるとか
> Cells(1,1).End(xlDown).Row
これはforで都度計算するのではなく、事前に求めて変数に入れておいたほうがいいような。あと、A列が空だったら、最終行までの100万回ループになってひどいことになりそう。
え、vba都度評価するんですかいやforなら普通か。何となく最初に評価してn to mで決めうちで終わりかと思いこんでました。デバッガのステップ実行も最初だけ通ってあとは本体のみで通らないので。そのうち確認しよう、ループ内でインクリメントしてみたりとか。
空列想定はそれはそうなんですが、シート末尾から上にというのも面倒だし、無視しています。使うのはほぼ自分だけだし、という言い訳。
whileでも毎回評価するでしょ…
なんというか、文法としてvbaのForはFor [var] = [int] To [int]なイメージだったんです。[int]部分は数値リテラル。[var]は変数。みたいな。末端としてループ処理にはいる前に一度だけ評価が行われ数値になり、Forステートメントの評価段階では数値リテラルと同質な、単なる数値になっているようなイメージが。完全に思いこみです。言われてみれば他言語のループ構文は都度評価が基本ですよねぇ。そのためにパフォーマンス気にして代入したりするし。
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
私は悩みをリストアップし始めたが、そのあまりの長さにいやけがさし、何も考えないことにした。-- Robert C. Pike
違ったらすみません (スコア:2)
ループ内にDoEventsを入れてみるとか
Re: (スコア:1)
> Cells(1,1).End(xlDown).Row
これはforで都度計算するのではなく、事前に求めて変数に入れておいたほうがいいような。
あと、A列が空だったら、最終行までの100万回ループになってひどいことになりそう。
Re: (スコア:1)
え、vba都度評価するんですか
いやforなら普通か。
何となく最初に評価してn to mで決めうちで終わりかと思いこんでました。デバッガのステップ実行も最初だけ通ってあとは本体のみで通らないので。
そのうち確認しよう、ループ内でインクリメントしてみたりとか。
空列想定はそれはそうなんですが、シート末尾から上にというのも面倒だし、無視しています。
使うのはほぼ自分だけだし、という言い訳。
Re:違ったらすみません (スコア:0)
whileでも毎回評価するでしょ…
Re:違ったらすみません (スコア:1)
なんというか、文法としてvbaのForは
For [var] = [int] To [int]
なイメージだったんです。
[int]部分は数値リテラル。[var]は変数。みたいな。
末端としてループ処理にはいる前に一度だけ評価が行われ数値になり、Forステートメントの評価段階では数値リテラルと同質な、単なる数値になっているようなイメージが。
完全に思いこみです。
言われてみれば他言語のループ構文は都度評価が基本ですよねぇ。そのためにパフォーマンス気にして代入したりするし。