如何删除Excel中的空白单元格？

Question

我想删除成千上万行和列中的空白单元格，有人可以帮我吗？ excel的值应按顺序排列。

示例输入：

所需的输出：

Answer 1

按Alt F11将脚本作为宏运行。 该网站提供了一些有用的见解。 https://www.excel-easy.com/vba/examples/delete-blank-cells.html

我希望这会有所帮助。

Answer 2

此代码与@Tony的代码基本相同，但不使用任何多余的单元格。

Dim counter As Integer, i As Integer
counter = 1
For i = 1 To 10
    If Cells(i, 1) <> "" Then
        Cells(counter, 1) = Cells(i, 1)
        counter = counter + 1
    End If
Next i
For i = counter To 10
    Cells(i, 1) = ""
Next i

由于原始文件中有空白，因此不会丢失数据，因此counter始终小于或等于i。最后一个for..next循环清除所有剩余的可见的先前数据。

Answer 3

您需要做的是：

• 选择A：B列
• 转到功能区> 开始
• 正在编辑> 搜索并选择
• 点击> 选择特殊
• 点击> 空白

现在应该选择所有空单元格

• 按 Ctrl -并向上移动单元格。