【来日复制粘贴】使某列筛选的结果映射到标题部分

上图的实现公式

=INDEX(A5:A103,MATCH(1,SUBTOTAL(3,OFFSET(A4,ROW(A5:A103)-4,)),))

变异体：

如何用公式达到下图的统计人数效果？

1. 创建名称，在引用位置处的公式为

=IF(SUBTOTAL(3,OFFSET(Sheet1!$A$3,ROW(Sheet1!$A$4:$A$13)-3,)),Sheet1!$A$4:$A$13,"")

2. 在人数位置的公式为

=SUM(IF(RY<>"",--(MATCH(RY,RY,0)=ROW(A4:A13)-3)))

【来日复制粘贴】使某列筛选的结果映射到标题部分相关推荐

【来日复制粘贴】用高级筛选和函数公式拆分数据列表
要求把表2里面不包含的项从表1取出,并建立一个新表. A25处的公式为 =ISNA(MATCH(A3,$F$3:$F$12,0)) ※须留意:因为例子里面的订单编号是唯一的所以用match没问题.m ...
【来日复制粘贴】状态栏随机显示
最近都在折腾别的,没有好好编程,不开心.今天凑巧看到一个我老是会磕绊的地方,特此记录.另外,整个这个程序当滚动条思路还是不错的. 大意就是收款时间那里为空的就是还欠账呢,然后可以让他的大名去状态栏滚动 ...
【来日复制粘贴】跨sheet的数据录入
效果: 录入Sheet2: 代码的含义需自己点明一下,方便日后用起来瞬间理解它的运行逻辑. Sub haha()Dim lastRow As Long Dim lstData As ListObjec ...
vba获取最后一行一列，复制粘贴特定一列的值
Sub CheckNum() iCount = 0iRow = ActiveSheet.Range("s65535").End(xlUp).Row '取最后一行 iCol = Ac ...
【来日复制粘贴】关于排名
图之, 1. 关于效率排名公式为 =SUMPRODUCT(1*(B2/C2<B$2:B$15/C$2:C$15))+1 2. 关于不占位业绩排名公式为 =SUMPRODUCT((B$2:B$ ...
【来日复制粘贴】输出匹配到的字符串
目前用正则还是很少,用到的话一般也是replace那个函数.一直头疼我要输出找到的东西咋整?原来是用数组搞定.代码如下, Sub RegTest()'定义正则表达式对象Dim oRegExp As ...
【来日复制粘贴】使用公式提取数据
要求, 在以下表格中提取市场部人员的员工编号. 可用公式有两个,全部为数组公式 =IF(ROW(1:1)>COUNTIF(C$2:C$20,"市场部"),"&quo ...
【来日复制粘贴】提取工作表和工作簿名称
在过Excel 函数与公式的时候,看到一个可能以后在写vba时候能够使用的长公式.特此记录. 效果: 具体公式: =CELL("filename",$A$1) =MID(B2,FI ...
【来日复制粘贴】数据透视表分类不同账龄
大意就是有一些应收账数据,对应着具体日期,现在需要你把这些应收账分为:小于30天的账,31到60天的账,61到90天的账,最后是大于90天的账. 数据源接下来第一件事,把它做成数据透视表,如下图. ...

【来日复制粘贴】使某列筛选的结果映射到标题部分

【来日复制粘贴】使某列筛选的结果映射到标题部分相关推荐

最新文章

热门文章