楼主的需求，需要三段简单的代码来完成
如图数据的情况下
安排两个OptionButton（需要定义同一个Group）
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub OptionButton1_Click()
Range("I3") = Range("H3") * Range("G3")
End Sub
Private Sub OptionButton2_Click()
Range("I3") = Range("H3") * Range("G4")
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$3" Then
If Sheet1.OptionButton1.Value = True Then Range("I3") = Range("H3") * Range("G3")
If Sheet1.OptionButton2.Value = True Then Range("I3") = Range("H3") * Range("G4")
End If
End Sub
两个OptionButton的Click代码处理单选按钮被点击的事件，一个SheetChange代码处理数量调整的情况（如果单价也会变化，还需要添加单价变化的情况）
第二个图片（蓝色）使用了单选按钮的LinkedCell属性来把值赋予对应的单元格，然后使用公式计算出结果
附件可参考，提问者下载不需要财富值
很抱歉，回答者上传的附件已失效
