当前位置:首页 > 办公设计 > Office教程 > 借助循环语句为数组赋值

借助循环语句为数组赋值

11个月前 (05-24)Office教程990

本文为《别怕,Excel VBA其实很简单(第3版)》随书问题参考答案

1、将1到100的自然数存入数组arr

Sub 将1到100的数存入数组()
Dim Arr(1 To 100) As Integer, i As Byte
For i = 1 To 100
Arr(i) = i
Next
End Sub

 

2、将活动工作表A1:A100中的数据存入数组brr

Sub 将区域中的数据存入数组()
Dim Brr(1 To 100), i As Byte
For i = 1 To 100
Brr(i) = Cells(i, "A").Value
Next i
End Sub

扫描二维码推送至手机访问。

欢迎转载或分享本篇文章。

本文链接:https://www.jcba123.com/article/1394

分享给朋友:

“借助循环语句为数组赋值” 的相关文章

PPT设计一组简约UI图标风格

PPT设计一组简约UI图标风格

图标和LOGO都可以用来表达我们所想要表达的言语,在制作PPT模板的过程中,用图标来表达可能比文字更加醒目,比如:企鹅图标,我们通常会联想到QQ。灵活的搭配图标不仅可以表达你所想,还能够让模板效果更加美观,更加有视觉冲击! 今天,易老师来为大家分享一组简单的UI风格图标的制作,非常非常简单!效果也...

Excel中的快速分析,你用过吗?

Excel中的快速分析,你用过吗?

如果你使用的是Excel2013及以上版本,一定别忘了使用快速分析功能。选中一些数据之后,Excel会智能的对这些数据进行分析,并给出相应的分析选项,而咱们要做的,就是点击几下鼠标而已。 接下来,就一起看看快速分析到底有多快。 1、突出显示6500元以上的销售额   2...

做表不用Ctrl键,天天加班八点半

做表不用Ctrl键,天天加班八点半

用Ctrl键与其他键组合,能形成很多快捷键,比如大家最熟悉的Ctrl+C(复制)、Ctrl+V(粘贴)和Ctrl+Z(撤销)。 除此之外,常用的Ctrl系组合键还有Ctrl+A(全选)、Ctrl+S(保存)、Ctrl+F(查找)、Ctrl+H(替换)、Ctrl+X(剪切)、Ctrl+P(打印)、Ct...

PPT如何制作文字镂空效果

PPT如何制作文字镂空效果

首先,在站长素材网站(https://sc.chinaz.com/)搜索并下载一张喜欢的图片。 第一步:打开PPT软件,创建一个新的空白演示文稿。然后,在幻灯片上插入刚刚下载的图片,并将其置于底层。 第二步:插入一个与页面大小相同的矩形,将其填充为黑色,并调整矩形的透明度...

一对多查询的4种解法,你最喜欢哪一种?

一对多查询的4种解法,你最喜欢哪一种?

就是当一个查询值对应多条记录时,如何才能把这些记录全部提取出来呢? 如下图所示,是多个部门的员工信息。 现在,咱们要按部门提取出对应的姓名。 解法1:VLOOKUP+辅助列 单击A列的列标,然后右键→插入,插入一个空白列。 在A2单元格输入公式,向下复制。 =B2&COUNTIF($B$...

商务风格PPT封面设计

商务风格PPT封面设计

首先,在站长素材网站(https://sc.chinaz.com/)搜索并下载一张喜欢的图片。 第一步:打开PPT软件,创建一个新的空白演示文稿。然后,点击插入——形状——平行四边形,按住黄色控点调节平行四边形倾斜程度,复制多个平行四边形,调整长度、间距,进行排版。选中所有平行四边形,...

发表评论

访客

看不清,换一张

◎欢迎参与讨论,请在这里发表您的看法和观点。