我想删除一个范围内的空白单元格(E1:E130)。
此代码跳过单元格。
For Each cell In ranger
If cell.Value = "" Then
cell.Delete
End If
next cell
为了使我的目标更清楚:我有一个单元格列表，其中包含 E1:E130 范围内的文本和空单元格，我想从 E1 开始制作一个没有任何空单元格的列表。
例如，按字母排序也是一个很好的解决方案，但这对我来说也不起作用。
最佳答案
我会像下面这样去
With Range("E1:E130")
If WorksheetFunction.CountA(.Cells) > 0 Then .SpecialCells(xlCellTypeBlanks).Delete Shift:=xlShiftUp
End With
关于excel - 删除范围内的空白单元格，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/49045885/