excel - 删除范围内的空白单元格

Question

我想删除一个范围内的空白单元格(E1:E130)。

此代码跳过单元格。

For Each cell In ranger
    If cell.Value = "" Then
        cell.Delete
    End If
next cell

为了使我的目标更清楚:我有一个单元格列表，其中包含 E1:E130 范围内的文本和空单元格，我想从 E1 开始制作一个没有任何空单元格的列表。
例如，按字母排序也是一个很好的解决方案，但这对我来说也不起作用。

Answer 1

我会像下面这样去

With Range("E1:E130")
    If WorksheetFunction.CountA(.Cells) > 0 Then .SpecialCells(xlCellTypeBlanks).Delete Shift:=xlShiftUp
End With