Question

我不希望我的问题被误认为是删除行或删除空格。

在许多情况下，我遇到过具有过多行或列的excel文件。我想知道如何完全删除额外的行。

例如，当前有问题的excel文件包含第1行到第2000行的数据，但excel表中有66,000行。我想删除所有额外的行，以便当我从第1行滚动到第2000行时，第2000行的滚动条位于滚动条的底部。

请注意：不能选择将数据复制并粘贴到新工作表。目前，所有额外的行，我的滚动条只能从滚动条的顶部向下移动5％。

回答解决方案：删除所有行滚动到工作表顶部，保存，关闭，重新打开......

Answer 1

如您所知，如果您在Excel中突出显示单元格或行或列并点击Delete button，则会删除内容，但单元格保持不变（尽管为空）。行不向上滚动，列也不向左滚动。

但是，如果您突出显示行（不仅是单元格，而是使用左侧灰色边框区域的整个行）并使用鼠标右键菜单 - 选择Delete - 则会删除单元格来自工作表。（不是键盘上的删除按钮）

执行此操作后，行将向上滚动，或者列将向左滚动以填充已删除的范围。这也应该减少工作表的（明显）大小。

但是 - 当您向下滚动时，Excel将自动添加更多行。还有其他方法来隐藏这些行，但上面的技巧应该删除困扰你的行。

here的另一个选项：

限制没有VBA的行和列

限制工作表工作区的另一种更永久的方法是隐藏未使用的行和列。

要隐藏A1：Z30范围之外的行和列，步骤为：

单击第31行的行标题以选择整行。
按住键盘上的Shift和Ctrl键。
按下并释放键盘上的向下箭头键以选择全部第31行到工作表底部的行。
右键单击行标题以打开上下文菜单。
在菜单中选择隐藏以隐藏所选列。
单击AA列的列标题，然后重复上述步骤上面两到五个隐藏Z列后的所有列。
将工作簿以及范围A1之外的列和行保存到 Z30将保持隐藏状态。

Answer 2

尝试以下短宏：

Sub rowHIDER()
  Dim N As Long

  N = Application.InputBox(Prompt:="Enter the number of the last row you want visible: ", Type:=1)
  Range(Cells(N + 1, 1), Cells(Rows.Count, 1)).EntireRow.Delete
  Range(Cells(N + 1, 1), Cells(Rows.Count, 1)).EntireRow.Hidden = True
End Sub

Answer 3

我经常会在这些工作簿中看到大量空行 - 删除行然后再次保存。关。重新开放。希望他们能够永远消失。

如何删除Excel工作表中的行？

3 个答案: