您的位置：程序门 -> 其他开发语言 -> office开发/ vba

帮忙找错，就10行代码（关于excel中的vb)

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

帮忙找错，就10行代码（关于excel中的vb)

发表于：2007-02-08 11:43:13 楼主

dim n（5) as long
for i=0 to 5
n（i)=i
next

sheet1.range（ "a1:a5 ")=n（)

以上代码是将数组写入sheet1的a1到a10中去，但是结果写入的都是n（0)，只有用下面的方面才行，那么上面的代码有错误吗？
for i=0 to 5
sheet1.range（ "a " & i + 1) = n（i)
next

求解！谢谢

发表于：2007-02-08 13:42:421楼得分:0

该回复于2007-12-28 12:41:47被管理员或版主删除

发表于：2007-02-08 16:30:012楼得分:0

n（)默认条件下就是n（0)

发表于：2007-02-08 16:32:153楼得分:0

sheet1.range（ "a1:a5 ")是数组类型,需要使用函数数组的方式进行付值

发表于：2007-02-12 14:13:514楼得分:0

dim n（5, 0) as long
for i = 0 to 5
n（i, 0) = i
next
sheet1.range（ "a1:a5 ") = n

发表于：2007-02-12 15:46:555楼得分:0

參考這里：
http://community.csdn.net/expert/topicview3.asp?id=5334461

下一篇：■∵用vba代码对工作表上的数据排序
上一篇：vba中打开word的命令是“open”，以副本只读方式打开的命令是什么？

其他资讯