一:单元格基础概念
单元格:是excel中最小的一个单位(工作簿,工作表,行,列,单元格)
'单元格也是我们操作得最多的。
'单元格行数:1048576
'单元格列数:16384
'单元格个数:17179869184
'单元格容量:32767 个字符
二:案例
'range的常见写法
Sub rng()
Range("a1").Select '单元格
Range("a:a").Select '列
Range("1:3").Select '行
Range("a1:b10").Select '相邻区域
Range("a1:d7,c4:e8").Select '不相个邻区域
End Sub
'写法:Range ("文本型装单元格地址1","文本型装单元格地址2")
'range的变化写法
Sub rng变化()
Range("a1:b10").Select '一般写法
Range("a1", "b10").Select '变化写法1
Range(Range("a1"), Range("b10")).Select '变化写法2
Range("a1") = 123
End Sub
'注意:
'1.如果在range前没有指定工作表,则默认为活动工作表
'2.如果对象不是活动工作表(如活动图表),则会出现错误
Sub 单元格对象例子()
Debug.Print Range("a:a").Count '计数工作表最大的行数
Debug.Print Range("1:1").Count '计算工作表最大的列数
Debug.Print Application.CountA(Range("a:a")) '计算工作表已使用的行数
Debug.Print Application.CountA(Range("1:1")) '计算工作表已使用的列数
End Sub
还有更多的变化写法
'1.range("地址区域").range("地址区域")
Sub 序号表示法()
Range("b2:d4").Range("a1").Select '相对引用的写法
'参照前一个range的左上单元格
End Sub
'2.range地址区域中支持变量
Sub range的变量支持()
Dim a%
a = 3
Range("a" & a).Select '因为第二个a是个变量所以不能用“”括起来
Range("c3:e5")(2).Select '括号中的2是索引值
End Sub
Sub 实例1动态选单元格或区域()
Dim i%
i = Application.CountA(Range("c:c")) '找到c列中已使用的最后一个单元格位置
Range("c" & i).Select '选择C列最后一格
Range("a1", "c" & i).Select '选择A1到C列的最后一格(方法一)
Range("a1:c" & i).Select '选择A1到C列的最后一格(方法二)
'小结:动态单元格区域的定位,可以应用到单据的保存等实际工作中
End Sub
'range区域中的每个单元格,我们也可以用索引号表示出来
'写法:range("单元格区域")(行号,列号)
Sub 索引号取出range的单元格()
'Range("a1:c4")(4).Select '引用顺序是:从左向右,从上到下选取
'Range("b2:c4")(3).Select '以前一个单元格区域为照
Range("a1:c4")(4.5).Select '当有小数时,则取整
'注意:如果索引号出现小数,则按照“四舍六入五单双”的“银行家舍入法”
End Sub