VBA取得EXCEL表格中的行数和列数
VBA取得EXCEL表格中的行数和列数
请注意不要使用Columus等关键字作为变量,例如"Columus = ActiveSheet.UsedRange.Columns.Count"!
初学EXCEL宏的童鞋,总是很想知道表格中含有数据的行数和列数,尤其是行数和列数不确定的情况下。这样可以避免很多的错误,并且可以提高效率。但每次用到的时候到网上查找时,总是给了很多无用的答案,往往找不到想要的结果。笔者也是每次使用时,临时查找总是很头疼。偶然发现一篇博客,上面详细记录了不同的方法,笔者测试了几种发现真的很好用。本着分享万岁的精神,将博客内容共享出来。希望对大家有所帮助。
来源:http://www.okexcel.com.cn/bbs/viewthread.php?tid=26
注:每种方法中上面的是Excel的行数,下面的是Excel的列数。
方法1:
ActiveSheet.UsedRange.Rows.Count
ActiveSheet.UsedRange.Columns.Count
缺点:有时可能会比实际数大一些,原因是如果你把最后几行(列)数据清除后(非整行或整列删除),用这个命令仍返回未清除前的值。就是说现在虽然是空的,但是你曾经用过也算你的。
方法2:
ActiveSheet.Range(“A65535”).End(xlUp).Row
ActiveSheet.Range(“IV1”).End(xlToLeft).Column
可以简写为:
ActiveSheet.[A65536].End(xlUp).Row
ActiveSheet.[IV1].End(xlToLeft).Column
缺点:只能计算出一列(行)的最后一个单元格所在的行(列)数。本例是只返回A列最后一个单元格所占的行数。
方法3:
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Column
缺点:在工作表进行对删除或清除操作时也会变得比实际情况大。
方法4:
ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column
缺点:在工作表进行对删除或清除操作时也会变得比实际情况大。
方法5:
Application.CountA(ActiveSheet.Range(“A:A”))
Application.CountA(ActiveSheet.Range(“1:1”))
只能统计一列(行)的实际使用情况,得到的不一定是最后一行(列)的位置。方法2的数值比此方法大时,说明在A列的数据间有空白未填写的单元格。
方法6:
ActiveSheet.Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
ActiveSheet.Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
效果同方法2
以上方法中比较常用的是方法1和方法2。
VBA取得EXCEL表格中的行数和列数相关推荐
- 用VBA得到EXCEL表格中的行数和列数
用VBA得到EXCEL表格中的行数和列数 每种方法中上面的是Excel的行数,下面的是Excel的列数. 方法1: ActiveSheet.UsedRange.Rows.Count ActiveShe ...
- (转贴)用VBA得到EXCEL表格中的行数和列数
<script type="text/javascript"></script> <script src="http://pagead2.g ...
- 同时删除Excel表格中多行隔行空白行
Excel表格中要同时删除隔行的空白行,如果要一行一行地删除就太麻烦了,下面来介绍下如何同时删除Excel表格中多行的隔行空白行. 1.如下图所示,我们需要删除的是每一行下面的空白单元格 2.首先,全 ...
- 计算机excel中行高在哪里,电脑Excel表格怎么对行高和列宽进行调整
电脑Excel表格怎么对行高和列宽进行调整 腾讯视频/爱奇艺/优酷/外卖 充值4折起 在我们使用Excel表格处理数据的时候,我们经常需要调整行高和列宽,今天小编就告诉大家电脑Excel表格怎么对行高 ...
- access调整行高和列宽_《excel表格怎么调整行高和列宽》 EXCEL 表格如何导出至WORD 格式...
EXCEL 表格如何导出至WORD 格式 1.演示使用的软件为word文字处理软件,软件为office家学生版2016. 2.首先打开我档,并在上方栏找到插入菜单,单击后在工具栏中找到文本-对象. 3 ...
- axure中怎么做出固定首行_办公软件操作技巧078:如何在excel表格中冻结行与列...
在日常工作中,有时我们编辑的excel表格会比较大,数据内容有很多行和列,当我们拖动滚动条找到了离表头比较远的数据行或列的内容时,又看不到行或列表头标题信息了,这时再去处理数据信息就会感觉很不方便,如 ...
- excel表格怎么调整行高和列宽_如何在Excel中竖向批量插入图片,这个简单方法你知道吗...
酌酒与君君自宽,人情翻覆似波澜.白首相知犹按剑,朱门先达笑弹冠.草色全经细雨湿,花枝欲动春风寒.世事浮云何足问,不如高卧且加餐. --[唐]王维<酌酒与裴迪> 不知道大家有没有遇到过这种情 ...
- excel表格怎么调整行高和列宽_在Excel中批量插入图片?这要如何操作呢
酌酒与君君自宽,人情翻覆似波澜.白首相知犹按剑,朱门先达笑弹冠.草色全经细雨湿,花枝欲动春风寒.世事浮云何足问,不如高卧且加餐. --[唐]王维<酌酒与裴迪> 不知道大家有没有遇到过这种情 ...
- excel表格怎么调整行高和列宽_WPS图文教程:表格使用小技巧
编按:哈喽,大家好!WPS表格和Office表格这两款软件,对于职场人士来说,可谓是无人不知无人不晓,有人觉得Office更好用,而有人觉得WPS更好用,双方都有强大的粉丝群!往常部落窝总是带给大家关 ...
- matlab excel 单元居中,用matlab如何识别excel里的单元格是否为合并单元格|excel表格怎么调整行高和列宽...
用matlab合并excel表格文件 没看明白 你换一种表述说说 matlab怎么合并excel单元格并赋值? 需要确切地说明一下:matlab导入默认是double型的,小数点后至以保留15位.你不 ...
最新文章
- 在Ubuntu 16.4.3 LTS x86_64上安装PyCharm社区版笔记
- 08-图7 公路村村通
- Python+selenium 自动化-通过窗口名切换窗口,如何获取当前窗口的title窗口名
- 学生管理系统(SSM简易版)总结
- 字符数组、字节数组、字符串转换
- 马里奥AI实现方式探索 ——神经网络+增强学习
- 取得MS SQL 2000数据库一个表的所有列名
- python判断相同,Python判断两个文件是否相同与两个文本进行相同项筛选的方法
- 带虚函数的类的sizeof分析
- CodeForces 589J Cleaner Robot
- 在Unity中为模型使用表情
- Linux命令解释之df
- 聚宽macd底背离_很多散户可能永远都不会知道:MACD月线金叉,每一次MACD月金叉都会带来一波牛市...
- POJ1149PIGS
- MySQL 8 中值得关注的新特性和改进
- (转)功能测试(黑盒测试)常用的策略和方法
- Android Studio 2.3.1导出jar文件不能生成release解决办法
- SpringMVC Ⅰ
- 基于51单片机的温湿度监测+定时报警系统(c51源码)
- 解决微信浏览器不能自动播放视频