Excel 关于给单选按钮和复选按钮赋值问题的求助

2025-02-22 11:36:03

推荐回答（1个）

回答1：

如下是我自己做的代码：
(OptionButton1.Value = True, "机加", "") & _
(OptionButton2.Value = True, "铸造", "") & _
(OptionButton3.Value = True, "生准", "") & _
(OptionButton4.Value = True, "外购毛坯", "") & _
(OptionButton5.Value = True, "零件供应商", "") & _
(OptionButton6.Value = True, "其他", "") = Application.WorksheetFunction.VLookup(0001, Range("C5:AF60000"), 30, False)'责任初判，单选按钮
(CheckBox1.Value = True, "自检 ", "") & _
(CheckBox2.Value = True, "首检 ", "") & _
(CheckBox3.Value = True, "终检 ", "") & _
(CheckBox4.Value = True, "监检 ", "") & _
(CheckBox5.Value = True, "巡检 ", "") & _
(CheckBox6.Value = True, "设备调整", "") & _
I(CheckBox7.Value = True, "换刀调整", "") & _
(CheckBox8.Value = True, "定期检查", "") & _
(CheckBox9.Value = True, "抽检", "")=Application.Wo