我希望提取并显示与单个参考编号相关的多个年龄的人。
下面的截图显示了工作表的设置。该工作表大约有 2500 行:
App ref,Relationship,Age,Date of Birth,Gender,Marital Status
1,A1,34,12-Apr-85,F,SINGLE
1,A1,34,12-Apr-85,F,SINGLE
1,PT,30,12-Oct-89,M,SINGLE
830,A1,63,10-Nov-56,F,MARRIED
830,SN,32,11-Nov-87,M,SINGLE
830,HU,65,24-Sep-54,M,MARRIED
846,A1,75,11-Aug-44,M,MARRIED
846,A2,72,16-Nov-47,F,MARRIED
对于每一个App Ref
,我想提取所有相关的年龄:
| App ref | Age 1 | Age 2 | Age 3 |
|---------|-------|-------|-------|
| 1 | 34 | 34 | 30 |
| 830 | 63 | 32 | 65 |
| 846 | 75 | 72 | - |
答案1
- 将 A 列复制到目标数据将开始的未使用列,并使用数据,删除重复项来生成一组唯一的应用程序参考数字。在下面的示例图片中,我使用了 H 列。
将此公式放在第一行单元格中,紧挨着你的独特应用程序参考数字并将其拖到右侧。在我的示例中,我从 I1 开始。
=TEXT(COLUMN(A:A), "\A\g\e 0")
将此公式代入1岁并向右向下拖动。在我的示例中,我从 I2 开始。
=IFERROR(INDEX($C:$C, AGGREGATE(15, 7, ROW($C$2:INDEX($C:$C, MATCH(1E+99, $C:$C)))/($A$2:INDEX($A:$A, MATCH(1E+99, $C:$C))=$H2), COLUMN(A:A))), "")
如果应用程序参考列按升序排序,然后您可以通过限制查找行来减少计算。
=IFERROR(INDEX($C:$C, AGGREGATE(15, 7, ROW(INDEX($A:$A, MATCH($H2, $A:$A, 0)):INDEX($A:$A, MATCH($H2, $A:$A))), COLUMN(A:A))), "")
答案2
你可以通过以下方式轻松完成Power Query
Excel 2010+ 中 Microsoft 的免费插件;包含Get & Transform
在 Excel 2016+ 中
除了输入自定义列公式之外,一切都可以通过 GUI 完成,并且如果原始数据发生变化,则查询可以轻松刷新。
- 选择原始表格中的一个单元格
Data--> Get & Transform --> from Table/Range
- 通过...分组
App ref
操作 == 所有行
- 添加自定义列(将
Age
列更改为List
- 公式
=Table.Column([Merged],"Age")
- 公式
comma
右键单击此新自定义列的双箭头,然后选择使用作为分隔符提取值comma
使用作为分隔符来拆分列。- 将新列重命名为
Age n
etc - 关闭并加载结果
M 代码
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"App ref", Int64.Type}, {"Relationship", type text}, {"Age", Int64.Type}, {"Date of Birth", type datetime}, {"Gender", type text}, {"Marital Status", type text}}),
#"Grouped Rows" = Table.Group(#"Changed Type", {"App ref"}, {{"Merged", each _, type table [App ref=number, Relationship=text, Age=number, Date of Birth=datetime, Gender=text, Marital Status=text]}}),
#"Added Custom" = Table.AddColumn(#"Grouped Rows", "Custom", each Table.Column([Merged],"Age")),
#"Extracted Values" = Table.TransformColumns(#"Added Custom", {"Custom", each Text.Combine(List.Transform(_, Text.From), ","), type text}),
#"Split Column by Delimiter" = Table.SplitColumn(#"Extracted Values", "Custom", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Custom.1", "Custom.2", "Custom.3"}),
#"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Custom.1", Int64.Type}, {"Custom.2", Int64.Type}, {"Custom.3", Int64.Type}}),
#"Renamed Columns" = Table.RenameColumns(#"Changed Type1",{{"Custom.1", "Age 1"}, {"Custom.2", "Age 2"}, {"Custom.3", "Age 3"}})
in
#"Renamed Columns"