VBA按钮控制表格行显示隐藏异常：填充后仅隐藏空行求助

你的代码逻辑本身就是只隐藏B5:B14范围内值为空的行，这就导致表格填充内容后，仅空值行会被隐藏——而未填充时所有单元格都是空值，所以所有行都能被隐藏，这就是你看到的“未填充正常、填充后异常”的原因。

如果你的需求是点击Hide按钮时隐藏B5:B14对应的所有行（不管单元格是否有内容），点击Show时恢复显示，直接修改代码如下：

Private Sub CommandButton1_Click()
    If CommandButton1.Caption = "Hide" Then
        ' 隐藏B5:B14对应的第5-14行
        Rows("5:14").EntireRow.Hidden = True
        CommandButton1.Caption = "Show"
    ElseIf CommandButton1.Caption = "Show" Then
        ' 显示第5-74行（保留你原有的显示范围）
        Rows("5:74").EntireRow.Hidden = False
        CommandButton1.Caption = "Hide"
    End If
End Sub

如果你的实际需求是基于单元格内容判断隐藏（比如隐藏有内容的行），只需把原代码的判断条件修改为：

If c.Value <> "" Then c.EntireRow.Hidden = True

内容的提问来源于stack exchange，提问作者Vka