Accessで困ってます

質問

下記のように
率50%以下の場合は「率50%以下」
率50%越60％以下の場合は「率60%以下」
率120%以上130％未満の場合は「率120%以上」
率130%以上の場合は「130%以上」
※60超120未満は空欄
としたいです。

率,備考
122,率120%以上
46,率50%以下
130,率130%以上
70,
52,率60％以下

お教えください。

回答No.2

chayamati

私のおもいちがいでした。
正しくは
Private Sub 評価()
If 率 <= 50 Then
備考 = "50%以下"
Else
If 率 <= 60 Then
備考 = "60%以下"
Else
If 率 <=120 Then
備考 = ""
Else
If 率 < 130 Then
備考 = "120%以下"
Else
If 率 >= 130 Then
備考 = "130%以上
End If
End If
End If
End If
End If
End Sub

回答No.1

chayamati

今日はVBAですが
Private Sub 評価()
備考=""
If 率 <= 50 Then
備考 = "率50%以下"
Else
If 率 <= 60 Then
備考 = "率60以下"
Else
If 率>= 120 And 率 <= 130 Then
　備考="率120%以上"
Else
If 率　= 130 Then
備考 = "率1３0%以上"
End If
End If
End If
End If
End Sub
―――――――――--------------------
追伸
「※60超120未満は空欄」は他の条件と矛盾しますので、省きました

※60超120未満は空欄