高手请进！EXCEL用VB自动显示和隐藏行或列

Question

高手请进！
EXCEL表中A2输入数字2，自动显示C、D两列和隐藏E~K列；
EXCEL表中A3输入数字2，自动显示A4、A5两行和隐藏A6~A10行；

Answer 1

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = 2 And Target.Row = 2 And Target.Column = 1 Then
        Columns("C:D").Hidden = False
        Columns("E:K").Hidden = True
    End If
    
    If Target = 2 And Target.Row = 3 And Target.Column = 1 Then
        Rows("4:5").Hidden = False
        Rows("6:10").Hidden = True
    End If
    
End Sub

代码放在工作表代码框中