Excel中当满足某个条件时，自动隐藏某些行-excel条件隐藏行,excel隐藏行列函数

按ALT+F11.在左边找到这张百表，双击，在右度边的空白问处复制下面的代码。
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column = 3 And .Count = 1 Then
If .Value = "完成答" Then
.Rows.EntireRow.Hidden = True
End If
End If
End With
End Sub
然后关闭，回到回C列，输入答"完成"就隐藏了

按ALT+F11.在左边找到这张表，抄双击，在右边的空白处复制下面的代码。袭 Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Column = 3 And .Count = 1 Then If .Value = "完成" Then .Rows.EntireRow.Hidden = True End If End If End WithEnd Sub 然后关闭，回到C列，输zhidao入"完成"就隐藏了

　　百你按Alt+F11，把下面代码放进去，度保存。退出代码窗口，然后问你的A1：C1（合并的单答元格取最左边内A1值）等2时就会自动隐藏，其它值会显示。容

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1").Value = 2 Then
    Rows("10:10").Select
    Selection.EntireRow.Hidden = True
Else
    Rows("9:11").Select
    Selection.EntireRow.Hidden = False
End If
    Range("A1").Select
End Sub

按ALT+F11.在左边找到这张表，双zd击，在右边的空白处复回制下面的代码。

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If .Column = 3 And .Count = 1 Then
            If .Value = "完成" Then
                .Rows.EntireRow.Hidden = True
            End If
        End If
    End With
End Sub

然后关闭，回到C列，输答入"完成"就隐藏了