VBA在涉及到数据区域的数据处理是,循环结构需要确定循环变量的最大值,一般就是我们需要处理的数据区域的最大行数和最大列数,至于如何计算选定数据单元格的行数和列数在这里归类除了三种方法,实例如下:
方法一:
Sheets("全部").Range("a1").Select
mycolumn = ActiveCell.CurrentRegion.Columns.Count
myrow = ActiveCell.CurrentRegion.Rows.Count
方法二:
mycolumn = Workbooks(b).Sheets(1).Range("a1").End(xlDown).Row
myrow = Workbooks("实例.xlsm").Sheets("统计").Range("a1").End(xlToRight).Column
方法三:
Sheets("实例").Range("a1").Select
Sheets(wjm).Range(Selection, Selection.End(xlDown)).Select
Sheets(wjm).Range(Selection, Selection.End(xlToRight)).Select
mycolumn = Selection.Columns.Count
myrow = Selection.Rows.Count
以上三种方法的效果是一样的,但第二种方法最简洁,但也要注意到方法二和方法三都用到了xlDown和xlToRight属性,这就要注意所选"a1"单元格所在的行和列是否有空单元格,如果有空单元格就会影响返回值。
1111

被折叠的 条评论
为什么被折叠?



