[VBA] CountIfに変数を使いたい

ある数値データがA1：A100まであるとします。これをいくつかの変数に基づいて数えたい場合、どうしたらいいのでしょうか？
x=1
For i = 1 To 10
Cells(i, 5) = WorksheetFunction.CountIf(Range("A1","A100),">-(x)")
x=x+10
Next i
のような式を作ったんですが、うまく働いてくれません。たぶん変数xが使えないからだと思いますが、他にいい方法が浮かびません。いい方法がありましたら教えてください。よろしくお願いします。

No.2 ベストアンサー 回答者： hana-hana3 回答日時： 2008/01/08 09:13

＞Cells(i, 5) = WorksheetFunction.CountIf(Range("A1","A100),">-(x)")

Cells(i, 5) = WorksheetFunction.CountIf(Range("A1:A100),">" & x)

かと思いますが。

この回答へのお礼

回答ありがとうございます。うまくいきました。こんな簡単なことだったんですね。失礼しました。

お礼日時：2008/01/08 09:59

No.1 回答者： pbforce 回答日時： 2008/01/08 09:13

F1～F10に1,11,21・・・と入れといて、これを検索値に使うのはいかがでしょうか？

この回答へのお礼

回答ありがとうございます。

お礼日時：2008/01/08 09:52