提问网友
发布时间：2024-03-05 16:02
声明：本网页内容为用户发布，旨在传播知识，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:1656858193@qq.com
热心网友
回答时间：2024-03-27 17:37
按alt+f11,双击左侧sheet1（以你数据所在工作表为准，也可以是sheet2,sheet3)对象，选Worksheet_Change，黏贴下面代码；
Private Sub Worksheet_Change(ByVal Target As Range)
i = ActiveSheet.[count(d2:d65536)] + 1
If ActiveSheet.Range("d" & i) = 0 Then
Range("a1:d1").AutoFilter Field:=4, Criteria1:="<>0", Operator:=xlAnd
End If
End Sub
你测试一下 满不满足你要求 我的贴图是gif 可以参考操作
热心网友
回答时间：2024-03-27 17:37
本文如未解决您的问题请添加抖音号：51dongshi（抖音搜索懂视），直接咨询即可。
