建议使用VBA的Change事件代码。
追问就是不会弄 能否给个完整代码
追答Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target = "B" Then Rows("18:23").Hidden = True
If Target = "A" Then Rows("18:23").Hidden = False
End If
End Sub
追问我太笨了,还是无法成功运行 能否给个邮箱 我把文件发给你 麻烦给我弄一下
追答仔细看看我的头像就应该知道怎么发送文件了