为什么要用复选框呢,用下拉菜单不好吗
VB 模块加入以下代码:If ActiveSheet.CheckBox1.Value = "True" Then a = 1 Else a = -1For x = 2 To 100 '填你需要处理的行数Cells(x, 2) = Cells(x, 2) - Cells(x, 1) * aNext x
合并计算就行。
我Hi你了,没有收到信息吗?将复选框与单元格关联,然后用sum函数求和就行了