+ -
当前位置:首页 → 问答吧 → 求助:打开复制可以用变量吗?

求助:打开复制可以用变量吗?

时间:2011-08-04

来源:互联网

Set sht = wk.Sheets("sheet2")
    sht.Range("i1").Copy
我现在能选中sheet2然后复制i1的数据,那么我能不能设定一个变量来替换"sheet2""i1"这2个固定值,例如;在sheet1中设置A1为sheet3,A2设置为I2,那么在宏中运行的就是
Set sht = wk.Sheets("sheet3")
    sht.Range("i2").Copy
请教大侠们,可不可以达到这个效果?


还是上附件: 提取数据.rar (55.48 KB)
提取数据.rar (55.48 KB)
下载次数: 0
2011-8-4 17:45


[ 本帖最后由 lljjren 于 2011-8-4 17:45 编辑 ]

作者: lljjren   发布时间: 2011-08-04

可以用变量,但是变量名不能与关键字冲突。
如sht就是替换"sheet2"的变量。
可用rng来替换单元格i2:Set rng=sht.Range("i2")
rng.copy

作者: 蓝桥玄霜   发布时间: 2011-08-04

楼上的可能有点出入;比如我是在sheet1的A1中输入i2,那么我需要复制的就是sheet3中的i2的数值,在sheet1的A1中输入i3那么我需要复制的就是sheet3中的i3的数值,也就是要定义的是sht.Range("i2")中i2成为引用在其他地方的可变数值

作者: lljjren   发布时间: 2011-08-04

蓝桥版主再来帮我看下子哦~

作者: lljjren   发布时间: 2011-08-04

自己顶上去求个高手帮看一下

作者: lljjren   发布时间: 2011-08-04

相关阅读 更多