最新WPS办公软件学习教程_免费企业办公软件下载_金山WPS Office官网论坛

 找回密码
 
查看: 12357|回复: 35

[VBA/VBS教程] 【VBA For ET 教材连载系列】 十七

[复制链接]

399

主题

75

听众

3062

积分

测试体验团员

Rank: 14Rank: 14Rank: 14Rank: 14

该用户从未签到

金币
3
威望
5033
帖子
2014
精华
11

特殊贡献奖 最佳教程奖 活跃会员奖

发表于 2009-6-28 15:14 |显示全部楼层
分享到: 新浪微博 腾讯微博
本课时讲述Cells1,1)方式引用单元格的方法。( \  A9 Q; y, \3 n* ]# W* F
Cells方式引用单元格有四种用法。  |9 `+ ~# [( u: h' ~* Z4 s& }
17.1 WorkSheet.Cells(横座标,纵座标)
( f9 r# e  t! n9 _* {: K
: w4 S! d/ a- j4 v' Q5 `- M

; s3 x9 y3 A; i$ X. G2 Z6 b# ?引用某工作表中行、列座标所指定的单元格,可以使用本方式,基本语法为:# T$ u1 H! b8 p, G
[Sheet].Cells([RowIndex],[ColumnIndex])——其中工作表对象可选,行与列座标也可选
5 m, y! i( V3 D% @; B' J  a本方式可以引用某个工作表中横座标与纵座标之交叉点,该座标原点在左上角,向右偏移一个单位即为A列,向下偏移一个单位即第一行,那么Cells(1,1)即为A1单元格。7 s# k# V2 _2 A: ?
如果代码中忽略工作表对象,则默认指当前工作表;如果忽略横座标与纵座标号,则默认引用所有单元格。
, h% e+ U- K& n' I" P$ E( d以下是几种合法的单元格引用:& W: ^. \# p# T3 e# d
Sheets(1).Cells(5, 4)——表示引用第一个工作表中行座标为5、列座标为4的单元格D5
+ M, S, x! ?! ~3 g, N提示:ET的最大行是65536,最大列是IV列,对应的数值为256,那么Cells的第一参数只能在165536之间,第二参数只能在1256之间,否则将产生运行时错误。
- R* v$ |. }& F  _17.2 WorkSheet.Cells(行号,列标)
: v4 [  _# R0 u1 D
本引用方式依靠目标地址的行号与列标来确定目标单元格。其中行号与列标两个参数都是必选参数。而工作表对象Worksheet则是可选参数。' {  a1 V/ f# z5 `
以下三个引用为合法的单元格对象引用:2 Z4 ^8 [7 w4 U! J
Sheets("生产表").Cells(2, "C")——表示引用“生产表”中C2单元格
. D+ D# \0 ~' K: \" B4 TCells(12, "Z")——表示引用当前表Z12单元格" i" ^8 p- h) F( u
但是第一参数只能使用数值,文本型数字也不行。例如Cells("12", "Z")将产生错误。Excel允许这种书写方式,它会将文本“”12””转换成数值“12”,然后再引用单元格。; G% y3 g, j- F$ _7 n/ [
提示:本方法引用单元格永远只能引用一个单元格,不能引用区域。
, \- \2 u  M9 t, n17.3 Range.Cells(横座标,纵座标)8 `: o$ `) q6 N) ]
本方式引用单元格是以其父对象Range左上角单元格做为参照系,向下及向右累加的座标系数来指定单元格。有别于第一种在工作表中A1单元格为参照。
' s6 `) d1 F' ]" y7 H例如以下单元格引用:1 H! s) f5 }. B7 b1 @: S8 g
Range("B2:G10").Cells(2, 2)
# N! A4 s$ S2 b+ D
# O4 p6 J$ g3 S$ R8 {6 D& |5 l9 {
! x4 v; Z4 j# @* O' J& ?. P) W3 `5 g' a
# z, @% v% `5 y4 s* ?

8 V' x: |. S6 j' [- w+ m代码表示B2:G10单元格中横座标为2、纵座标为2的单元格C3。利用图展示它们的关系则可以表现为:. {+ ^% o  u& {& x5 y, r) _
% w9 h) T. w1 q- k2 }9 }2 R

5 A. w4 L3 @% g5 S
) Y8 }( F8 A" P/ }
  P9 q1 F4 a* z/ i  v
17.1 Range("B2:G10").Cells(2, 2)图示
) Q# U6 u, O8 f4 D# `4 e
图中黄色单元格如果相对于工作表,那么其横纵座标分别为33,但对于B2:G10区域,其横纵座标则为22$ N( V: K8 e; i7 x
Cells的参数还可以使用小数,不过VBA会将其进行四舍五入后再计算座标。例如:: {% F8 c9 B5 o6 p; h' I
Range("B2:G10").Cells(1.5, 4.4)——表示引用B2:G10区域第二行、第四列G3单元格! H% X  v" Q3 Z$ s7 H, M5 w
还可以使用负数或者0做为参数,那么其座标计算方式则向左与向上偏移。例如:: ?( x! Y* Y4 e* R2 g6 g! m* }
Range("D4:G10").Cells(-1, -1)——表示引用B2单元格
$ z2 r: ?  K, N3 q; |; W2 h  BRange("D4:G10").Cells(0, -2)——表示引用A3单元格* |2 h- }2 M* m& T! \
17.2是负数座标的图示:! C; J# _+ U* M, \8 W5 m
9 X5 a& z9 A. k& Q

' L9 v1 n& o0 T9 G) `) j5 X
! \# D% s2 F5 `0 p9 Z" S8 w5 ?
  17.2
: S! V* I, J* }" \* A
Range("D4:G10").Cells(-1, -1)
图示

+ b2 Y' s2 S- j) Q17.4 Range.cells(索引号)
+ }- s1 x4 X8 C  M  c. q7 F
当使用单个索引号做为参数时,它表示父对象中的一个索引子集。其编号方式是先行后列、先左后右。
8 ^! C  B0 [  A* y5 g' ], x+ _例如以下的引用:
/ o( [! [9 v5 D0 P/ D+ I/ Q. sRange("B2:G10").Cells(5)——表示B2:G10区域中第5个单元格F2,B2开始向右5个单位
" f1 R& u- q5 U; aRange("B2:G10").Cells(7)——表示B2:G10区域中第7个单元格B3,因父对象只有6,那么从第二行开始累加一个,即第7个单元格" k/ ]- r! [' M$ F4 q" S0 H7 B
索引号不允许超过其父对象的单元格个数.
例如Range("B2:G10").Cells(60) 这样引用方式已超出它的有效范围,Excel允许如此用法,这点上与Excel的引用方式不一致。
" Z+ ?: N: }) S' @+ D$ `" L. }- R

+ Y' F) o* j! y  ^) _0 C[ 本帖最后由 wendy   于 2009-12-23 16:11 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,

1109

主题

48

听众

1万

积分

测试体验团长

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

签到天数: 67 天

[LV.6]常住居民II

金币
2228
威望
33169
帖子
13495
精华
2

测试体验官 灯谜超人 世博会馆馆长 WPS粉丝团 最佳管理奖 勤奋版主奖 最佳教程奖 活跃会员奖 解答支持团 测试体验团 重阳节勋章 优秀会员奖 乐于助人奖

发表于 2009-6-28 16:06 |显示全部楼层
:victory:
WPS测试体验团欢迎您!
QQ群号:208253958 参与测试和体验WPS所有产品线的产品,包含稳定版本,内测版本,开发版,新功能日构建版本等,提交建议或BUG。
章程”、【报道
回复

使用道具 举报

0

主题

0

听众

20

积分

LV.1

Rank: 1

该用户从未签到

金币
0
威望
20
帖子
20
精华
0
发表于 2009-7-6 15:10 |显示全部楼层
果然是很复杂啊,不过还好理解上不困难,:)
回复

使用道具 举报

5

主题

0

听众

1842

积分

LV.8

Rank: 8Rank: 8

签到天数: 41 天

[LV.5]常住居民I

金币
347
威望
4997
帖子
488
精华
0
发表于 2010-1-9 15:22 |显示全部楼层
可以理解,谢罗版,讲的很明白!
回复

使用道具 举报

0

主题

0

听众

312

积分

LV.4

Rank: 4

该用户从未签到

金币
6
威望
838
帖子
66
精华
0
发表于 2013-9-2 10:14 |显示全部楼层
继续学习。. Z# [4 w& H& ?4 T% ]  u0 C9 Z
回复

使用道具 举报

2

主题

0

听众

636

积分

LV.5

Rank: 5Rank: 5

该用户从未签到

金币
100
威望
1771
帖子
164
精华
0
发表于 2013-11-22 17:40 |显示全部楼层
还好,这章还能理解
回复

使用道具 举报

0

主题

0

听众

8

积分

LV.1

Rank: 1

该用户从未签到

金币
0
威望
20
帖子
4
精华
0
发表于 2013-12-31 17:31 |显示全部楼层
果然是很复杂啊
回复

使用道具 举报

21

主题

37

听众

3144

积分

技术分享团员

Rank: 14Rank: 14Rank: 14Rank: 14

签到天数: 2 天

[LV.1]初来乍到

金币
933
威望
8073
帖子
1041
精华
0

WPS粉丝团 技术分享团 技巧教程分享达人 优秀会员奖 乐于助人奖

发表于 2014-1-25 12:57 |显示全部楼层

- n, }, Y" U6 k. O7 ^! L来学习教程!支持!
回复

使用道具 举报

114

主题

20

听众

2万

积分

LV.18

Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18

签到天数: 1244 天

[LV.10]以坛为家III

金币
2144
威望
69396
帖子
4240
精华
0

优秀会员奖 活跃会员奖

发表于 2015-3-1 14:08 |显示全部楼层
学习一下        
回复

使用道具 举报

114

主题

20

听众

2万

积分

LV.18

Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18

签到天数: 1244 天

[LV.10]以坛为家III

金币
2144
威望
69396
帖子
4240
精华
0

优秀会员奖 活跃会员奖

发表于 2015-6-21 18:31 |显示全部楼层
jsdbplt 发表于 2015-3-1 14:08
, u* w# @% ~5 A: \: y. Z学习一下
: B2 S' T5 ~* J. i
了解一下         
回复

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 更多账号登录:

快速回帖:

fastpost

WPS论坛更新日志|WPS Office官方论坛 ( 粤公网安备 44049102496073号 粤ICP备13015957号-1   

GMT+8, 2018-1-22 16:38

Powered by Discuz! X2.5

© 2001-2012 Comsenz Inc.

回顶部