Excel实例下载
  VBA  应用教程
    数据库SQL知识
设为首页
列出自定义函数返回多个值
作者:crdotlin | 来源:Excel VBA Comics | 时间:2006-09-09 | 阅读权限:游客 | 会员币:0 | 【

Excel的工作表虽多,但我们还是常用到自定义函数。如果自定义函数返回了多个值,那怎么在单元格显示呢?答案就是用数组公式。

如下面的这个自定义函数,返回了公式所在单元格的工作簿名称,工作表名称,行号与列号:

Function GetCallerInfo() As Variant
    With Application
        If TypeName(.Caller) = "Range" Then
            GetCallerInfo = Array(.Caller.Parent.Parent.Name, .Caller.Parent.Name, .Caller.Row, .Caller.Column)
        End If
    End With
End Function

那在工作表中,先选择一行中的四个单元格,再用数组公式:{=GetCallerInfo()},就可以列出返回值了。

如果要在一列中,就利用TRANSPOSE来转换区域,公式为:{=TRANSPOSE(GetCallerInfo())}。

GetCallerInfo.rar

文章录入:admin | 浏览次数:
相关评论(以下网友评论只代表其个人观点,不代表Excel吧的观点或立场)
相关信息

关于本站 | 留言本站 | 友情连接 | 后台管理
Copyright © 2005 - 2008 Excel吧 Inc. All Rights Reserved.
HxCms Ver9.0  闽ICP备06001689号
关闭此窗口