excel vba 数组赋值遇到问题 office2010
答案:1 悬赏:0 手机版
解决时间 2021-02-06 12:51
- 提问者网友：记得曾经
- 2021-02-05 19:52
excel vba 数组赋值遇到问题 office2010
最佳答案
- 五星知识达人网友：我住北渡口
- 2021-02-05 21:01
数组访问越界问题。office 中，数组默认的下标基于 0，而 range 对象中集合下标基于 1，
在文件开始处添加： option base 1 试试追问不是这个问题，通过这样的赋值方式很简单直接，可以不做循环就能赋值给数组，并且下标也会随excel单元格的格式一样，下标自动为1起。追答s15 =Range(Cells(1, fs15range), Cells(s15r, s15c)).value
问题出在上一句，Range 没有指定父对象，那么就是当前活动的工作表，如果这段代码放在sheet1 中，当前活动的工作表就是sheet1，运行正常，如果当前活动的工作表就是sheet2，执行上述代码时，就无法访问。可以改成：如：
s15 =sheet。Range(Cells(1, fs15range), Cells(s15r, s15c)).value
在文件开始处添加： option base 1 试试追问不是这个问题，通过这样的赋值方式很简单直接，可以不做循环就能赋值给数组，并且下标也会随excel单元格的格式一样，下标自动为1起。追答s15 =Range(Cells(1, fs15range), Cells(s15r, s15c)).value
问题出在上一句，Range 没有指定父对象，那么就是当前活动的工作表，如果这段代码放在sheet1 中，当前活动的工作表就是sheet1，运行正常，如果当前活动的工作表就是sheet2，执行上述代码时，就无法访问。可以改成：如：
s15 =sheet。Range(Cells(1, fs15range), Cells(s15r, s15c)).value
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯