欢迎来到天天文库
浏览记录
ID:51688402
大小:35.95 KB
页数:2页
时间:2020-03-15
《excel使用“宏”删除空白行.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、使用“宏”删除空白行在Excel中,“宏”功能是相当强大的,利用“宏”我们可以完成许多Excel菜单功能之外的特殊功能,下面就介绍如何利用“宏”功能实现在工作表中删除空白行的操作方法。1.启动Excel程序,选择“工具”菜单中“宏”项目下的“宏”命令,进入“宏”对话框,在“宏名”输入框中输入宏名称“删除空白行”,然后单击“创建”按钮,进入“宏”编辑程序界面。2.在“宏”编辑窗口中,在“Sub删除空白行()”语句下依次录入如下语句:Dimi&Dimx&Dimk&x=0Fori=1ToRange(Cells(1,1),ActiveSheet.UsedRange).Rows.Cou
2、ntIfApplication.WorksheetFunction.CountBlank(Rows(i).EntireRow)<>256Thenx=x+1Nextik=1DoIfApplication.WorksheetFunction.CountBlank(Rows(k).EntireRow)=256ThenRows(k).DeleteIfx=Range(Cells(1,1),ActiveSheet.UsedRange).Rows.CountThenExitSubIfApplication.WorksheetFunction.CountBlank(Rows(k).Entir
3、eRow)<>256Thenk=k+1EndIfLoopEndSub3.完成上述宏命令语句录入工作后,单击“保存”按钮将创建的宏进行保存,然后将宏编辑窗口关闭,返回Excel程序界面。4.当需要对工作表进行删除空白行操作时,用户先将需要进行删除空白行操作的工作表打开,选择“工具”菜单中“宏”项目下的“宏”命令,进入“宏”对话框,然后从“宏”列表窗口中选择“删除空白行”,再单击“执行”按钮即可将工作表中所有的空白行删除,非常方便。5.如果用户需要经常对工作表进行删除空白行的操作,还可以将此“删除空白行”做成工具按钮添加到常用工具栏中。操作方法是选择“工具”菜单下的“自定义”命令
4、,打开“自定义”窗口,单击“命令”标签,在“类别”窗口中选择“宏”,在右边的“命令”窗口中找到刚才创建的“删除空白行”宏,选择它,按住鼠标左键不放将它拖至常用工具栏中,此外你还可以修改该宏按钮的名称和按钮图标格式。以后需要时,只要点击此按钮即可将工作表中的所有空白行删除。
此文档下载收益归作者所有