|
51.1 超過、かつ、51.9 未満であれば、以下。
If (51.1 < Range("C2").Value) And (Range("C2").Value < 51.9) Then
> If Range("C").Value > 53 Then
並列条件なら、If ... ElseIf ... です。
If (51.1 < Range("C2").Value) And (Range("C2").Value < 51.9) Then
...
ElseIf 53 < Range("C2").Value Then
...
End If
同じ値を複数評価するなら Select Case の方が良いでしょう。
Select Case Range("C2").Value
Case Is <= 51.1: ... '' 51.1 以下
Case Is < 51.9: ... '' 51.1 超過、51.9 未満※A
Case Is <= 53: ... '' 51.9 以上、53 未満
Case Is > 53: ... '' 53.0 超過※B
End Select
※A/B がこの投稿で指定された範囲。それ以外は隙間を埋めるためのもの。
ちょっと気になったのが、これ。
> Range("C").Value
セル(C2)ではなく列(C)の判断ですか? であれば、
・ループでセル1つずつ判断する
・Max/Min などで列の代表値を決めて、その代表値を判断する
のどちらかだと思います。
|
|