excel vba 删除空白单元格所在的行

如题所述

第1个回答 2022-09-28

1、首先在开发工具中打开VBA编辑器。

2、在单元格区域当中输入一些内容。

3、在VBA编辑器中插入模块。

4、在模块当中输入如下代码，然后运行Sub 清除空白数据行()Dim i As LongFor i=Cells(1048576, 2).End(xlUp).Row To 3 Step-1If Cells(i, 3)="" Then'如果单元格为Cells(i,1).EntireRow.Delete'符合条件的都删除整行End IfNext'检测下一个End Sub。

5、用快捷键Alt+F8调出运行宏窗口，然后单击“执行”按钮，程序执行后第三列为空白之单元格所在行全部删除。

相似回答

如何删除Excel工作表中包含空白单元格的行答：1、启动Excel并打开工作表，在该工作表的数据区域中存在空白单元格，如图1所示。在Visual Basic编辑器的工程资源管理器中插入一个模块，在模块的“代码”窗口中输入如下程序代码：Sub DeleteRow()Dim n,i As Integer For n=1 To 7 For i=1 To 20 Cells(i,n).SpecialCells(xlCellTypeBlanks).Entire...

如何用EXCEL的VBA脚本编写程序删除空行和空列答：取消合并单元格，以便在删除空行和空列时不会留下空白的单元格。调用 DeleteEmptyRows 子过程，删除所有空行。调用 DeleteEmptyColumns 子过程，删除所有空列。自动调整行高和列宽，以适应数据。Sub DeleteEmptyRows()这个子过程用于删除工作表中的空行。它首先确定最后一行的行号，然后从最后一行开始向上遍历...

用EXCEL VBA如何删除空格单元格所在的行,数据很大答：If Cells(i, 2) = "" Then '空格单元格所在的列根据自己，这里是B列。Rows(i).Delete End If Next End Sub

Excel VBA 自动删除空白行答：1、打开要删除空白行的文档。2、Alt+F11打开VB编辑器，右键新建一个模块。3、新建模块后，输入 Sub 删除空行()Dim a a = 1 Do While Cells(a, "a") <> ""If Cells(a, "D") = "" Then Rows(a).Select Selection.Delete Shift:=xlUp Else a = a + 1 End If Loop End Sub。4、...

Excel VBA:如何删去文本内容为空的几行?答：按 F5 点击 "点位条件"选择 "空值"鼠标右键单击, 选择删除, 整行.如果一定要VBA的话:Sub 删除()Sheet1.Columns("A:B").SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

利用vba如何自动查找excel中空单元格所在列,然后将其列或行删除...答：自己修改代码吧，关键部分如下：for each rn in range("A1:B10")if rn="" then rows(rn.row).delete‘删除行 columns(rn.column).delete'删除咧 end if next

大家正在搜

vba 单元格所在的行 vba返回单元格所在的行 vba点击单元格和选中单元格 excelvba查找单元格 vba获取数据所在单元格位置 vba怎么知道单元格是几行 vba查找字符串在单元格位置 vba 合并单元格 vba 选择单元格