excel - 如何设置复选框的具体值

Question

如果他们选择 r6 直到 y20，我想使该值在 textbox28 处仍固定为 4.2，但如果他们勾选
r6 = 0.222，
y10 = 0.4
y12 = 0.5 y20
= .7

(Val(r6.Value) + Val(TextBox33.Value) + Val(TextBox36.Value) + Val(TextBox26.Value)) - 这表示公式 x * y * 他们在复选框中勾选的值

If r6 Then TextBox28.Value = 4.2
If Y10 Then TextBox28.Value = 4.2
If Y12 Then TextBox28.Value = 4.2
If Y20 Then TextBox28.Value = 4.2

'calculation for amount' 
ttlqty.Value = Val(length.Value) * Val(nos.Value) * (the one that they tick)

'calculation for totalqty'
TextBox29.Value = Val(TextBox28.Value) * Val(TextBox27.Value)

如果用户选择 r6. 计算将是
2 * 3 * 0.222

如果他们取消勾选 r6 并勾选 y10。计算为
2 * 3 * 0.4

标签： excelvba