vba取得最大列数行数方法总结

取得最大列数行数方法总结（vba（为查找列从位置的单元格起，向上查找，直到找到最后一个非空range\单元格为止，并显示其行号range\a65536当我们在使用处理数据的时候，通常会遇到如下的代码（（（vba excelrange\range诸如此类的代码，那么，在引用对象中，属性指的是什么含义呢包含哪\range\些方法呢range end与对象的属性相关的知识属性包含如下四个方向range end end属性应用于返回一个对象所包含源区域的区域尾端的单元格等同于按xldownxltorightxltoleftxlup键向上键、向下键、向左键或向右键示例如下end range本示例选定包含单元格的区域中列顶端的单元格（end endendend本示例选定包含单元格的区域中第行尾端的单元格b4b range\（b44本示例将选定区域从单元格延伸至第四行最后一个包含数据的单元格range\（b4（worksheets\（列数据区域最后一行的行号（列数据区域最后一行的行号（列range\数据区域最后一行的行号（列数据区域最后一行的行号range\range\range\方法range\返回一个符合指定类型和值得对象（，）specialcells需要，见下表range.expression.specialcells typevalue任何格式的单元格含有验证条type xlcelltype件的单元格空单元格xlcelltypeallformatconditions.xlcelltypeallvalidation.含注释的单元格含有常量的单元格xlcelltypeblanks.含公式的单元格xlcelltypecomments.xlcelltypeconstants.所用区域中的最后一个单元格xlcelltypeformulas.xlcelltypelastcell.条件格式相同的单元格验证条件相同的单元格所有可见单元格xlcelltypesameformatconditions.xlcelltypesamevalidation.变量xlcelltypevisible.如果是或，这个参数值用于指定那种单value元格包含在返回结果中这些值可以加在一起返回多个类型默认是选择所有内容和type xlcelltypeconstantsxlcelltypeformulas格式，不管是什么类型的但换个值可以是内容之

一、见下表...xlspecialcellsvalue例子返回选定区域内最后一个单元格xlerrorsxllogicalxlnumbersxltextvalues（）（）以上为转贴，worksheets中有添加了不少新的定位条件，如行列内容差异单元格等\.activateactivesheet.cells.specialcells xlcelltypelastcell.activate（含公式单元格个数统计（）含公式的第一个单元格2010“”（（i=range\j=range\

23.columni=range\j=range\。