为什么要用复选框呢，用下拉菜单不好吗
VB 模块加入以下代码：
If ActiveSheet.CheckBox1.Value = "True" Then a = 1 Else a = -1
For x = 2 To 100 '填你需要处理的行数
Cells(x, 2) = Cells(x, 2) - Cells(x, 1) * a
Next x
合并计算就行。
我Hi你了，没有收到信息吗？将复选框与单元格关联，然后用sum函数求和就行了
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024