求一段excel宏代码，实现自动隐藏行-excel根据条件隐藏行,excel通过条件自动隐藏

If Cells(i, 2).Value = 0 Then 这句里面 的等于零， 这个零你把它换抄成你想设的关键字就行啊袭

比如 Cells(i, 2).Value=“隐藏” 这时候只要发现这个单元格里面有且只有这两zhidao个字那行就隐藏了
就你这段代码而言哈，行是从6开始的

自己录个来宏，改改源就好了

Private Sub Worksheet_Change(ByVal Target As Range)
    for i=1 to range("a65536").end(xlup).row
    If range("k"&i)=range("l"&i) Then
    Rows(i).EntireRow.Hidden = True
    End If
    next
    End Sub

如果不会可zd以联系。

打开“工具”→“宏”→“Visual Basic编辑器”（快捷键Alt+F11），在“模块”→“模块1”中来添加如下宏代码：

Sub 隐藏F_H()
    Columns("F:H").Hidden = True
End Sub

Sub 显示F_H()
    Columns("F:H").Hidden = False
End Sub

然后右键单击源图片一，弹出右键菜单，选择“指定宏...”，弹出指定宏对话框，选择“隐藏F_H”，类似的方zhidao法为图片二指定宏即可。

条件zd格式应该能满足你的要求 步骤如下， 1。鼠标选中21行以下的需要隐藏的所有行 2。格式版-条件格式-使用公式确定要设置格式的单元格-新建规则-输入 =$b$9="内部调整" 3.设置格式-数字权-自定义-输入 ;;; 确定 这样就做到了，B9=内部调整”不显示21行一下的行，但是内容还在，