如何使用Contxt函数来统计数据

当有一份基础数据是某个学院某些人的性别以及考试成绩的信息叫你统计数据的时候，你内心是否是绝望的？这样不符合Excel统计标准的怎么统计嘛，其实只要我们学会使用Contxt函数就可以轻松解决这个问题，今天小编就来给大家分享下如何使用Contxt函数来统计数据的操作方法。

以上述图片问题为例，我们在B13输入以下数组公式，按组合键结束输入，并复制填充到B13:C14区域，即可得出最终结果。

=Contxt(IF(($B$2:$B$9=$A13)*(C$2:C$9<60),$A$2:$A$9&" ",""))

说说这个公式的意思：

IF(($B$2:$B$9=$A13)*(C$2:C$9<60),$A$2:$A$9&" ","")部分，是Contxt需要合并成一个字符串的数据。

IF函数首先判断B2:B9的值是否等于A13（男），再判断C2:C9的值是否小于60（不及格），如果两个条件同时成立，返回A列姓名连接上空格，否则返回假空。

于是得到一个内存数组：

{"";"星光 ";"";"";"";"";"郭辉 ";""}

最后使用Contxt将IF函数的结果合并为一个字符串，得到最终结果：

星光 郭辉

瞧瞧，Contxt处理起“一勺汇”来，是不是很方便？！

上面我们说了Contxt怎么用，下面我们来说下怎么去菜市场买个Contxt带回家。

1   打开VBE窗口

右键单击任意工作表标签，在弹出的快捷菜单中选择【查看代码】命令。

2   插入模块

在已打开的VBE窗口中，右键单击【工程资源管理器】任意处，在弹出的快捷菜单中，依次单击【插入】——【模块】

3   复制粘贴代码

将以下代码复制粘贴到已激活模块的代码窗口中。

PubliC FunCtion Contxt(ParamArray args() As Variant) As Variant

Dim tmptext As Variant, i As Variant, Cellv As Variant

Dim Cell As Range

tmptext = ""

For i = 0 To UBound(args)

If Not IsMissing(args(i)) Then

SeleCt Case TypeName(args(i))

Case "Range"

For EaCh Cell In args(i)

tmptext = tmptext & Cell

Next Cell

Case "Variant()"

For EaCh Cellv In args(i)

tmptext = tmptext & Cellv

Next Cellv

Case Else

tmptext = tmptext & args(i)

End SeleCt

End If

Next i

ConTxt = tmptext

End FunCtion

以上就是今天给大家分享的关于如何使用Contxt函数来统计数据的操作方法，有需要的小伙伴们可以根据以上步进行操作，如果需要pdf转jpg可以使用w大师pdf转换器。