Cells 和 Range 的用法是固定的
通常情况 Cells 都使用两个参数,如果只使用 1 个参数时,则需要计算位置
比如说03版的
cells(2)=100 则单元格 B1=100
cells(257)=100 则单元格 A2=100
因为03版只有256列,所以在257的时候,就是 A2 单元格了
Cells(行,列) 里面的两个参数,
第一个参数>>行,只能是 数字,或者代表数字的变量
第二个参数>>列,可以是数字,也可以是代表数字的变量;还可以直接使用字母,同样可以是代表字母的变量
比如:
- Sub cc()
- Cells(1, 2) = 10 '第一行,第二列就是 B1
- Cells(2, 1) = 20 '第二行,第一列就是 A2
- h = 1: l = 2
- Cells(h, l) = 100 '第 h 行,第 l 列就是 B1
- Cells(l, h) = 200 '第 l 行,第 h 列就是 A2
- Cells(1, "B") = 1 '第一行, B 列,就是 B1
- Cells(2, "A") = 2 '第二行, A 列,就是 A2
- h = 1: l = "B"
- Cells(h, l) = 300 '第 h 行,第 l 列, 变量 l 的值是 B ,所以就是 B1
- Cells(l, h) = 400 '注意这里的变量 L 的值是字母
- '那么第 B 行,在那里呢...估计你都不知道吧?? 电脑将会报错
- End Sub
复制代码
Range(单元格地址或者地址区域)
一般情况下,Range,循环行,但是如果非得循环列的话,也可以
下面这个代码,就可以循环列 从A到Z,这也是最简单的循环方法能循环到的位置,
如果是AA~IV 或更多的,就自己研究吧~~
- Sub C()
- y = 1
- For x = 97 To 122
- Range(Chr(x) & y) = x
- Next
- For x = 65 To 90
- Range(Chr(x) & y) = x
- Next
- End Sub
复制代码
很多时候,我们要对一个区域进行循环求和
比如: A2:F10 ,要求每一行的G列都有一个和
我们知道的 区域表示方法是 Range("A2:F2"),这里我们要循环是数字2
- Sub C()
- For x = 2 To 10
- Range("G" & x) = Application.Sum(Range("A" & x & ":F" & x))
- Next
- End Sub
- '连接符号太多,经常写错 可以改为Range(cells(行,列),cells(行,列))
- Sub CC()
- For x = 2 To 10
- Range("G" & x) = Application.Sum(Range(Cells(x, "A"), Cells(x, "F"))) '这样就一目了然了
- Next
- End Sub
复制代码
还有很多种不同的组合方法,都是需要自己去研究的,
别人讲在多,你不去研究,也只是 知其然,不知其所以然
|