请解析VBAjs数组函数这个ARRAY函数

来源：蜘蛛抓取(WebSpider) 时间：2017-06-13 06:14 标签： 函数指针数组
推荐这篇日记的豆列
······本帖子已过去太久远了，不再提供回复功能。手写VBA数组函数，mark
概要在 MicrosoftExcel 了, 本文开头列出的版本有两种不同方法是从自定义函数返回多个值： 一个用于返回可变大小数组和一个用于返回固定大小数组。本文包含有关 VisualBasicforApplications 过程说明使用这些方法示例 MicrosoftVisualBasic。&Microsoft 提供编程示例仅, 供图示不附带任何明示或暗示。 这包括, 但不仅限于, 适销性或用于特定目的适用性的暗示保证。 本文假定您已熟悉与正在演示编程语言以及工具来调试过程来创建和使用。 Microsoft 支持工程师可以帮助解释功能的特定过程, 但它们将会修改这些示例以提供添加功能或构建过程以满足特定要求。方法来返回可变大小结果数组此方法返回根据参数范围值的数组。 所得数组的大小 fluctuates 取决于参数数组中元素的数量。 例如, 假设您要创建函数乘以 100， 区域中每个值相乘。 下列自定义函数接受 （范围） 的值数组作为参数：
Function Multiply_Range(myrange As Object) As Variant
Dim temp As Variant
Dim i As Integer, j As Integer
temp = myrange.Value 'creates a copy of the values in myrange
' if more than one element then loop through both dimensions of
' the array and multiply each element by 100.
' if not more than one element then temp is multiplied by 100.
If IsArray(temp) Then
For i = 1 To UBound(temp, 1)
For j = 1 To UBound(temp, 2)
temp(i, j) = temp(i, j) * 100
temp = temp * 100
Multiply_Range = temp
End Function
要使用自定义函数, A 1: A 4 单元格中输入以下数据：
A1: 5答 2： 3A： 1A： 2选择区域 B1:B4 并作为数组输入下列公式：
=Multiply_Range(A1:A4)注意：： 上述公式必须输入作为数组公式。 输入公式作为数组公式在 Microsoft Excel for Windows, ◎ CTRL + SHIFT + Enter。 在 Microsoft Excel for the Macintosh, COMMAND + Enter。结果将是：
要返回固定大小的数组结果方法此方法用于从自定义函数返回多个值假定所得数组中有固定数量的元素。下列自定义函数接受一个起始时间和结束并返回之间通过 1 - 列数组三行中的小时、 分钟和秒数。 &
Function Elapsed_Time(start, finish As Date) As Variant
Dim hours, minutes, seconds As Integer
hours = Hour(finish - start)
minutes = Minute(finish - start)
seconds = Second(finish - start)
Elapsed_Time = Application.Transpose(Array(hours, minutes, seconds))
End Function
要使用此自定义函数, 在两个单元 （例如, A 1 和下面 A2) 输入开始时间和结束时间。
A1: 1:00:00答 2： 6:49:34然后, 突出显示三 A5 （例如, A3) 列中单元格并作为数组公式输入下面：
=Elapsed_Time(A1,A2)
分享这篇日志的人也喜欢
瓶子的畅聊点歌间～
你们可爱的宝宝回来啦
课也不上课来直播
睡饱了来呀
热门日志推荐
人人最热标签
北京千橡网景科技发展有限公司：
文网文[号··京公网安备号·甲测资字
文化部监督电子邮箱：wlwh@··
文明办网文明上网举报电话： 举报邮箱：&&&&&&&&&&&&
请输入手机号，完成注册
请输入验证码
密码必须由6-20个字符组成
下载人人客户端
品评校花校草，体验校园广场Excel VBA数组基础_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
Excel VBA数组基础
|0|0|文档简介
Excel专家|
总评分4.4|
浏览量41212
&&通过大量的示例详细介绍了Excel VBA数组的基础知识,包括如何声明数组、给数组赋值、处理数组中的数据、动态数组、多维数组与数组的数组、将数组作为函数的参数、及数组快速排序等。
阅读已结束，如果下载本文需要使用1下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩7页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢VBA 函数返回数组如何接收
因为工作需要，做一些提前处理：
把EXCEL中的一些字段#####/*******/@@@@@@
分成单独的列，
返回时 #####& *******& @@@@@@@@作为一个数组返回的
可是如何接受这个数据呢
function getArr() as string()
&&&&dim myArr(1 to 2) as string
&&&&myArr(1)=&Hello &
&&&&myArr(2)=& World!&
&&&&getArr=myArr
end function
sub showResult()
&&&&'这里应该怎么获得那个返回的数组呢？
Sub showResult()
Dim myArr As Variant
myArr = getArr()
MsgBox (myArr(1))
MsgBox (myArr(2))
--- 共有 1 条评论 ---

我要回帖

更多关于 函数指针数组 的文章

 

随机推荐