大侠求助！！！

VBA_和尚

想把变量n旁边的两个单元格赋给变量rng，如何写？图片中提出出错为“方法range作用于对象-worksheet时失败”，错误代码1004.
改来改去，好像没有掌握错误的本质原因。
本人新手，请多帮忙。谢谢！
代码想要实现的功能是将表1中B列单位名称为“”江苏“”的对应的得分和排名（红色字体）copy到表2中对应特定位置。

序号	单位	得分	排名
1	浙江	88	5
2	江苏	79	6
3	福建	77	7
4	北京	98	1
5	上海	89	3
6	。。。

smdlyb

range(n)是几个意思？

VBA_和尚

smdlyb 发表于 2017-4-4 19:48
range(n)是几个意思？

dim n as range
代码想要实现的功能是将表1中B列单位名称为“”江苏“”的对应的得分和排名（红色字体）copy到表2中对应特定位置。

序号	单位	得分	排名
1	浙江	88	5
2	江苏	79	6
3	福建	77	7
4	北京	98	1
5	上海	89	3
6	。。。

smdlyb

把range（n）用n代替即可

smdlyb

VBA_和尚 发表于 2017-4-5 07:36
dim n as range
代码想要实现的功能是将表1中B列单位名称为“”江苏“”的对应的得分和排名（红色字体） ...

把range（n）用n代替即可

VBA_和尚

smdlyb 发表于 2017-4-5 08:27
把range（n）用n代替即可

谢谢，使用n确实能解决运行错误。
但还是发现以下问题：
dim rng as range
rng=n.offset(0,1).value‘将n隔壁单元格的值赋予rng变量，成功’
rng=range(n.offset(0,1).address,n.offset(0,2).address)将n右边的两个连续相邻单元格区域赋给rng变量仍旧出错。
我现在是通过定义数组，分别赋值的方式实现了，但还是想了解为什么rng制定区域会出错？谢谢！

smdlyb

VBA_和尚 发表于 2017-4-5 13:11
谢谢，使用n确实能解决运行错误。
但还是发现以下问题：
dim rng as range

把地址去掉看看