作业帮 > 综合 > 作业

Excel 中如何使用函数,.效果...a1=3,a2=4,a3=6 b1=3 如何做到B1=0的时候.a1,a2,a3

来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/13 13:45:22
Excel 中如何使用函数,.效果...a1=3,a2=4,a3=6 b1=3 如何做到B1=0的时候.a1,a2,a3都等于0 .否则不变
如果b1不等于0的时候,.那三个a1,a2,a3都不变.
Excel 中如何使用函数,.效果...a1=3,a2=4,a3=6 b1=3 如何做到B1=0的时候.a1,a2,a3
在a1 中输入公式=if(b1=0,0,3)
a2输入公式=if(b1=0,0,4)
a3输入公式=if(b1=0,0,6)
再问: 我还是没有 讲清楚 我的A1,A2,A3 都是可以输入数值的...只是偶尔需要把它们统一归0 手动改太麻烦了...还有 A4 A5 A6 A7.........很多很多的 统一改
再答: 这样只好用VBA来实现了,当B1=0时A列全部有数据的变0,否则不变保留A列原有数据,是这样吧? 按Alt+F11打开VBA编辑器,双击工程中的你要处理的工作表名,在右边的编辑框中粘贴如下代码,当B1修改时自动运行,当B1=0时A列所有数据=0 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$1" Then If Target.Value = 0 Then Range("A1:A" & Range("A65536").End(xlUp).Row) = 0 End If End If End Sub 如果是当B1=0时A列所有数据清空的话,修改如下 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$B$1" Then If Target.Value = 0 Then Range("A1:A" & Range("A65536").End(xlUp).Row) .ClearContents End If End If End Sub