我正在尝试删除excel中的单元格,因为它们的值从另一个函数变为空白

时间:2018-08-23 04:19:24

标签: excel vba excel-vba

我想删除空白单元格,并在删除其余单元格时向上移动。删除的单元不一定从上向下。它们可以出现在列表中的任何位置。

也有类似的问题,但是我的问题只针对单元格而不是整行。

第I列中需要删除单元格的位置的图像示例。

enter image description here

-谢谢

1 个答案:

答案 0 :(得分:1)

您可以通过SpecialCells(xlCellTypeBlanks)获取空白单元格,然后在任何特定列中删除这些单元格。

Option Explicit

Public Sub DeleteBlankCells()
    Workbooks("Sheet1").Columns("I").SpecialCells(xlCellTypeBlanks).Delete xlShiftUp
End Sub