作者:乔山办公网日期:
返回目录:excel表格制作
=SUMPRODUCT((B7:B1000="Anchors")*SUBTOTAL(103,OFFSET(A6,ROW(7:1000)-6,0))*R7:R1000)
设置中
如图所示
============
试试吧,但愿能够帮助您!
您的采纳就是我回答的动力!
用这e799bee5baa6e79fa5e98193e59b9ee7ad94330个代码试试:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("h2") = 0 Then
Columns("h:h").Select
Selection.EntireColumn.Hidden = True
Else
Columns("h:h").Select
Selection.EntireColumn.Hidden = False
End If
If Range("i2") = 0 Then
Columns("i:i").Select
Selection.EntireColumn.Hidden = True
Else
Columns("i:i").Select
Selection.EntireColumn.Hidden = False
End If
If Range("j2") = 0 Then
Columns("j:j").Select
Selection.EntireColumn.Hidden = True
Else
Columns("j:j").Select
Selection.EntireColumn.Hidden = False
End If
If Range("k2") = 0 Then
Columns("k:k").Select
Selection.EntireColumn.Hidden = True
Else
Columns("k:k").Select
Selection.EntireColumn.Hidden = False
End If
If Range("l2") = 0 Then
Columns("l:l").Select
Selection.EntireColumn.Hidden = True
Else
Columns("l:l").Select
Selection.EntireColumn.Hidden = False
End If
If Range("m2") = 0 Then
Columns("m:m").Select
Selection.EntireColumn.Hidden = True
Else
Columns("m:m").Select
Selection.EntireColumn.Hidden = False
End If
End Sub
工作中经zhidao常使用将0隐藏,这样非0的数据就会更凸显;
但是0所在列还是要加入计算的,所以我们一般不把0转换成空白,而用条件格版式将其隐藏。
操作方法如下:
选中你需要设定的区域
单击开始
单击条件格式-突出显示单元格规则-等于
在弹出的窗口直接输入0,设置为选择自定义权格式,将字体颜色设定为白色即可隐藏。