菜鸟谈VBA最最基础入门《原创》

ggsmart · 发表于 2009-9-9 18:03

改成这样试一试：

row1 = Sheet2.[b65536].End(xlUp).Row
Worksheets(2).Range("B3:C" & row1).Copy Worksheets(1).Cells(3, 2)

复制代码

SJTUBOB · 发表于 2009-9-9 20:00

这么改的理由是什么呢。。感觉和螳螂的代码是一个道理啊，为什么结果就不同啊。。纠结啊。。。

zznjcs · 发表于 2009-9-9 20:15

学生花名册汇总test.zip (29.84 KB, 下载次数: 114)
附件里有我的问题, 楼主的RANGE() 的形式我第一次见到,不大理解.
我的RANGE()的形式在"分类表"中用过,是可以的,为什么在这里就不行呢?

[ 本帖最后由 zznjcs 于 2009-9-14 18:36 编辑 ]

zznjcs · 发表于 2009-9-9 20:21

Range("B3:C" & row1)
是不是说范围在从B3到C列,行数是从3到row1.
我想应该是的.

那如果是B3 到B列第row1行,是不是可以写成Range("B3" & row1), 我试了好象不对.

那又有个问题,什么时候用&符号?

[ 本帖最后由 zznjcs 于 2009-9-9 20:55 编辑 ]

zznjcs · 发表于 2009-9-9 20:28

不好意思又有问题,如果有几个区域,如B3:C4, E5:F6, 怎么样把它们表示在一个RANGE()里面?

Range("B3:C4" &"E5:F6")对吗?

SJTUBOB · 发表于 2009-9-9 20:39

Range("B3:C4" ,"E5:F6")即可，&是字符连接符

ufoloyu · 发表于 2009-9-9 21:50

看了半天，看得头大，心里很着急，我在离清镇远３００公里的大山里面，可以不可告诉我点VBA最最最初级的教材或者资料的网址链接吗？谢谢

zznjcs · 发表于 2009-9-9 21:51

学生花名册汇总-finished.zip (33.52 KB, 下载次数: 148)
终于完成了作业, 不容易呀.

不过我还有个问题: 楼主加上的计时器是如何工作的?
Sub mysub()
  Dim start As Double
  start = Timer
MsgBox "程序共执行了" & Timer - start & "秒!"
End Sub

Timer 是系统计时器吧?
Msgbox " 程序共执行了:" & Timer-start &"秒!" 是不是显示目前系统时间 - 开始的系统时间= 用时?  其中的Timer-start实际是个公式, 不知道我的理解对不对.

zyh196712 · 发表于 2009-9-9 21:59

谢谢楼主的用心讲解！

可乐可可 · 发表于 2009-9-9 22:05

真心感谢啊。

		自动登录	找回密码
密码			免费注册

菜鸟谈VBA最最基础入门《原创》

回复 413楼 zznjcs 的帖子

回复 419楼 ggsmart 的帖子

回复 423楼 zznjcs 的帖子

楼主是贵阳的吗？