在Excel中如何利用VBA实现(符合条件)指定(空)行列的批量删除
要使用VBA,首先打开你的Excel电子表格,然后将Microsoft Visual Basic窗口打开,这样才能使用VBA代码!
方法是:在Excel中直接按下组合键Alt F11即可打开VB窗口,倘若VB默认没有打开代码窗口,请执行操作:“视图”→“代码窗口”即可!
好了,环境都设置好了,下面来学习如题所示的操作吧!
代码1#8212;删除第8个单元格为空的行,范围从1行到88行:
----------------------------------------------------------
Sub DeleteEmptyRow '删除指定的单元格为空的行
Dim i As Integer
For i = 88 To 1 Step -1
If Cells(i, 8) = "" Then
Sheets("sheet1").Rows(i).Delete
End If
Next i
End Sub
----------------------------------------------------------
代码解释:
For i = 88 To 1 Step -1 '循环语句,从第88行一直检查到第1行
If Cells(i, 8) = "" Then '如果当前行的第8列的值为空值,那么就删除该行!i是变量,随着循环而变,其值从88逐渐减小到1
代码2#8212;删除第6个单元格为空的列,范围从1列到66列:
----------------------------------------------------------
Sub DeleteEmptyColmn() '删除指定的单元格为空的列
Dim i As Integer
For i = 66 To 1 Step -1
If Cells(i, 6) = "" Then
Sheets("sheet1").Columns(i).Delete
End If
Next i
End Sub
----------------------------------------------------------
代码解释:与上面的代码类似,不再解释!
知识扩展:
以上两种代码仅删除sheet1工作表满足条件的空行空列,如果要一次性删除多个工作表的满足条件的空行和空列呢?
同样道理,只要再代码外面再使用一个循环即可!
----------------------------------------------------------
Sub DeleteEmptyRowAndColmn() '删除指定的单元格为空的行
Dim i As Integer
For j = 1 To 3
For i = 88 To 1 Step -1
If Cells(i, 6) = "" Then
Sheets(j).Columns(i).Delete
End If
Next i
Next j
End Sub
相关文章参考:
VBA语言基础
各种Excel VBA的命令
VB6 中将数据导出到 Excel 提速之法
VBA语法200句
各种Excel VBA的命令
Execl编程详解
其它VB相关:
VB软件操作EXCEL教程:※VB全面控制Excel
在Excel中如何利用VBA实现(符合条件)指定(空)行列的批量删除相关推荐
- 利用VBA将excel中链接转换为图片形式存放在指定的单元格中
利用VBA将excel中链接转换为图片形式存放在指定的单元格中 VBA代码如下 Private Declare Function URLDownloadToFile Lib "urlmon& ...
- Excel中如何利用函数验证身份证号码是否正确?
今天小编跟大家分享一下Excel中如何利用函数验证身份证号码录入是否正确? 1.首先打开Excel文件,然后选中身份证号码单元格区域 2.然后找到并鼠标单击[DIY工具箱]选项 3.点击[身份证] ...
- 使用RANK函数按计算机基础的降序求名次,在EXCEL中如何利用RANK(number,ref,order)函数求名次排名...
在EXCEL中如何利用RANK(number,ref,order)函数求名次排名 关注:234 答案:4 手机版 解决时间 2021-02-11 11:16 提问者夏日╮悲歌 2021-02-11 ...
- Excel 中 查看 当前列 最后一个不为空的值 (使用公式实现)
■前言 如题所示 使用公式实现:在 Excel 中 查看 当前列 最后一个不为空的值 ■实现 INDEX函数 与 COUNTA 函数 结合使用 =INDEX(D5:D19,COUNTA(D5:D19 ...
- qt中json构造一个数组_告别撸单元格!我来分享Excel中如何利用一条公式得到一个数组...
来分享一个Excel中小众的大招."小众的大招"--这么说不矛盾.在Excel表格中利用一条公式来得到一个数组是一个高深且晦涩的话题.多数人不懂什么是数组,所以遇到此类文章或应用实 ...
- Excel中的宏--VBA的简单例子
第一步:点击录制宏 第二步:填写宏的方法名 第三步:进行一系列的操作之后,关闭宏 第四步:根据自己的需要查看,修改宏 第六步:保存,一般是另存为,后缀名为.xlsm,否则宏语言不能保存. 到此为止恭喜 ...
- Excel计算年龄(足岁)问题:Excel中datedif和VBA中的datediff函数介绍
1.Excel中的datedif函数 之前我通过身份证计算年龄时,都是取第7到10位,用当年的年份去减,得到一个年龄,这样不准确.后来,发现了datedif函数,注意,只有一个f. 函数语法: DAT ...
- pb利用datawindow查询符合条件的数据并且过滤掉其他数据_数据质量监测
1 Overview 1.1 数据质量 在数据部门里,数据质量问题经常是被动发现,所以数据质量的问题是大多数公司数据部门都不得不面对的问题.数据质量校验的目标是监控数据管道中,生产者.处理阶段以及消费 ...
- Python 批量提取Excel中的图片,图片文件名按指定列存储
openpyxl 以及 openpyxl_image_loader,conda或者pip无法安装的话,官网下载whl,然后pip安装本地包 [注意]:图片必须在单元格内,不能压过单元格边界 from ...
最新文章
- DedeCMS筛选简单实现方法不改后台源文件
- 用java开发一个Hello Word系统内核
- 【极客blog图文讲解】ruby以及Jekyll的环境配置(针对mac linux)
- kl距离 java_信息量、熵、最大熵、联合熵、条件熵、相对熵、互信息。
- 一文说通C#中的异步编程
- 协议转换器安全使用须知
- GDAL库进度信息编写示例
- Bailian2886 能被3除尽的数之和【进制】
- 记载学习Android的开发过程
- Mac VLC播放器怎么禁止使用硬件解码?
- 谷歌中国算法比赛解题报告 APAC2017C
- VMware虚拟机XP系统安装教程
- 砌体的弹性模量计算_砌体弹性模量等参数的取值.doc
- 通过UDP解析域名 DNS解析
- 海报生成的Java方法
- 绘制一个stm32最小系统的电路原理图;完成STM32+SD卡 的系统原理图设计
- 计算机应用大赛宣传稿,江苏开放大学计算机应用基础中国名城宣传片
- 通过QQ邮件发送文档到kindle,kindle收不到的问题
- (转载)TRS的WCM6漏洞权限绕过以及绕过密码的登陆方式
- mt4登录下方显示没有服务器,FXCM福汇MT4登录没有FXCM-USDReal07服务器怎么办,登录不了...
热门文章
- 开源游戏《一小时人生》GitHub仓库被删,CEO亲自道歉
- 喝下硅谷创业毒药后的 13 年
- 厉害了,蚂蚁金服!创造了中国自己的数据库 OceanBase
- 分布式架构的演进过程,docker面试题汇总
- 爆赞!java生成文件
- android的log.v,Android Log.v(),Log.d(),Log.i(),Log.w(),Log.e() - 何时使用每一个?
- 7 win 卸载node_如何从windows中完全删除node.js_windows彻底卸载node教程
- php公众号推荐,良心推荐6个优质实用又有趣的微信公众号!
- html form 返回的数据类型,HTML表单
- 添加七牛云存储_七牛云存储如何正确设置流量带宽告警配置(阈值告警)?