Range对象相加问题

weiguoyin868 · 发表于 2011-1-5 22:49

想进行Range对象相加，再赋给指定单元格区域，没成功。
Sub js1()
Dim s3 As Range

s3 = Range("a1:b3") + Range("a5:b6")
s3.Copy [A8:b9]

End Sub

Zamyi · 发表于 2011-1-6 09:11

只有值才可以相加，对象不可想加。RANGE对象才有COPY属性，变量没有。

liuguansky · 发表于 2011-1-6 10:10

union。。

试试

Zamyi · 发表于 2011-1-6 10:41

[A8:b9]=[a1:b3 + a5:b6]

doitbest · 发表于 2011-1-6 16:32

这种用法挺有意思！

cjihong · 发表于 2011-1-6 20:46

要是用数组，把数据读到数组中再写回来，如何做呀！

excelflower · 发表于 2011-1-6 20:56

原帖由 Zamyi 于 2011-1-6 10:41 发表
[A8:b9]=[a1:b3 + a5:b6]

老师的代码真是神奇！哪本教课书上有呀？是老师自己琢磨的吧？

liuguansky · 发表于 2011-1-8 22:59

[]可以对区域进行、简单运算
比如[a1:b1&""]等等

GZ020517 · 发表于 2011-5-21 09:05

呵呵，思想有多远，就能走多远呀

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

[求助] Range对象相加问题