在Excel中，可以使用VBA代码来自动隐藏所有空行。以下是一个示例代码：

Sub HideEmptyRows()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim rng As Range
    Dim cell As Range
    
    Set ws = ActiveSheet ' 或者使用 Sheets("Sheet1") 替换 ActiveSheet，根据需要修改表格名称
    
    lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row ' 获取最后一行
    
    Set rng = ws.Range("A1:A" & lastRow) ' 指定需要检查的列范围
    
    For Each cell In rng
        If IsEmpty(cell) Then
            cell.EntireRow.Hidden = True ' 隐藏空行
        Else
            cell.EntireRow.Hidden = False ' 显示非空行
        End If
    Next cell
End Sub

要使用此代码，请按以下步骤操作：

1. 打开Excel文件，按下Alt + F11打开VBA编辑器。
2. 在VBA编辑器中，选择插入 > 模块，插入一个新的模块。
3. 将上述代码复制粘贴到新模块中。
4. 按下F5运行代码。

此代码将根据指定的列（在代码中为"A"列）隐藏所有空行。您可以根据需要修改代码中的列范围和表格名称。