Excel 从表中删除多行
目前正在运行Excel 2013。我的电子表格最近变成了一个表格,它有几千行数据。在我按日期范围筛选然后删除某些行之前,我使用“查找并选择->转到特殊->可见单元格”仅选择所有可见单元格,而不删除筛选出的行 显然,我不能将多行作为一个表删除,有办法解决这个问题吗?该选项已灰显,快捷键ctrl+-不起作用,我已尝试根据上一个线程更改regedit键 我的悲惨命运是将信息复制到非表格中、编辑、复制回原始文件并重新格式化为表格吗?请告诉我不是这样的 尝试: 在屏幕左侧的行号上单击鼠标左键可选择整行。之后,右键单击行号将显示一个菜单,您可以在其中单击“删除”。 通过按住ctrl键或按住shift键同时单击行号,可以选择多行。然后右键单击任何行号并单击“删除”将删除所有选定的行。 对表进行排序可以使选择多行更容易。 这会有帮助的Excel 从表中删除多行,excel,excel-2013,Excel,Excel 2013,目前正在运行Excel 2013。我的电子表格最近变成了一个表格,它有几千行数据。在我按日期范围筛选然后删除某些行之前,我使用“查找并选择->转到特殊->可见单元格”仅选择所有可见单元格,而不删除筛选出的行 显然,我不能将多行作为一个表删除,有办法解决这个问题吗?该选项已灰显,快捷键ctrl+-不起作用,我已尝试根据上一个线程更改regedit键 我的悲惨命运是将信息复制到非表格中、编辑、复制回原始文件并重新格式化为表格吗?请告诉我不是这样的 尝试: 在屏幕左侧的行号上单击鼠标左键可选择整行。之
Private Sub imperecheaza_Click() {
Dim ws As Worksheet
Dim Rand As Long
Set ws = Worksheets("BD_IR")
Rand = 3
Do While ws.Cells(Rand, 4).Value <> "" And Rand < 65000
If ws.Cells(Rand, 4).Value = gksluri.Value * 1 And ws.Cells(Rand, 5).Value = gksluri.List(gksluri.ListIndex, 1) * 1 Then
ws.Rows(Rand) = "" '(here you will delete entire Row)
gksluri.RemoveItem gksluri.ListIndex
Exit Do
End If
Rand = Rand + 1
Loop
End Sub
在SpecialCellsxlCellsTypeVisible区域中循环,并在每个区域的每行中循环。将行收集到并集中,然后删除并集。因此无法在功能区/右键单击中进行简单更改,它必须是VBA宏?我不太熟悉特殊单元和循环,也不太熟悉联合。我能帮你打圈吗?还是我离垒太远了?我还添加了一个图像,以帮助缩小我试图做的事情。