我想删除空白单元格,并在删除其余单元格时向上移动。删除的单元不一定从上向下。它们可以出现在列表中的任何位置。
也有类似的问题,但是我的问题只针对单元格而不是整行。
第I列中需要删除单元格的位置的图像示例。
-谢谢
答案 0 :(得分:1)
您可以通过SpecialCells(xlCellTypeBlanks)
获取空白单元格,然后在任何特定列中删除这些单元格。
Option Explicit
Public Sub DeleteBlankCells()
Workbooks("Sheet1").Columns("I").SpecialCells(xlCellTypeBlanks).Delete xlShiftUp
End Sub