Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
楼主: uranus1997

[习题] 【V入2期】数组入门练习一

  [复制链接]
发表于 2011-4-19 14:28 | 显示全部楼层
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
回复

使用道具 举报

发表于 2011-6-2 08:24 | 显示全部楼层
本帖最后由 rebornxldeng 于 2011-6-2 08:25 编辑

arrName={"周一","钱二","张三","李四","王五","赵六","陈七","何八","冯九","郑零"}_1行10列
arrName={99; 85;92.5; 70;78.5; 65;84;100}_8行1列
......原来是VBA作业啊,看错.忽略吧
回复

使用道具 举报

发表于 2011-7-29 14:12 | 显示全部楼层
回复

使用道具 举报

发表于 2011-7-31 23:08 | 显示全部楼层
谢谢,我亲手
回复

使用道具 举报

发表于 2011-8-9 20:52 | 显示全部楼层
         学习看看
回复

使用道具 举报

发表于 2011-8-17 05:47 | 显示全部楼层
练习学习收集资料
回复

使用道具 举报

发表于 2011-11-29 15:02 | 显示全部楼层
谢谢楼主的教程!
回复

使用道具 举报

发表于 2012-3-17 21:48 | 显示全部楼层
不会做,来看看

回复

使用道具 举报

发表于 2012-5-29 20:45 | 显示全部楼层
Option Explicit
Sub a()
Dim arrname, arrnum
arrname = Array("周一", "钱二", "张三", "王五", "赵六", "陈七", "何八", "冯久", "郑零")
arrnum = Array(99, 85, 95.5, 70, 78.5, 65, 84, 100)
Range("a5").Resize(1, UBound(arrname)) = arrname
Range("a6").Resize(1, UBound(arrnum)) = arrnum
End Sub

回复

使用道具 举报

发表于 2013-5-16 21:11 | 显示全部楼层
正在学习数组,觉得好难理解
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-3 10:03 , Processed in 0.801234 second(s), 6 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表