ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 530|回复: 8

[求助] 如何将多行多列快速转化成一行多列

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-1-6 21:51 | 显示全部楼层 |阅读模式
哪位大神指导下,如何将多行多列快速转化成一行多列。谢谢
以下是样本,正式的数据比这个多。



image.png

工作簿1.zip

7.02 KB, 下载次数: 12

TA的精华主题

TA的得分主题

发表于 2023-1-6 21:58 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
E2,下拉
  1. =IFNA(INDEX(A:A,1+MATCH(,COUNTIF(E$1:E1,A$2:A$10),)),"")
复制代码

F2,右拉下拉
  1. =IFERROR(INDEX($B:$B,SMALL(IF($E2=$A$2:$A$10,ROW($2:$10)),COLUMN(A1))),"")
复制代码

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-6 22:10 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2023-1-6 22:11 | 显示全部楼层
guowei886 发表于 2023-1-6 22:10
大神,好像不行,是我弄错了?

数组公式,CTRL+shift+enter

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-6 22:18 | 显示全部楼层
w4275 发表于 2023-1-6 22:11
数组公式,CTRL+shift+enter

可以了,非常感谢!

TA的精华主题

TA的得分主题

发表于 2023-1-6 22:20 来自手机 | 显示全部楼层
https://club.excelhome.net/forum.php?mod=viewthread&tid=1628008&fromguid=hot&extra=&mobile&_dsign=4957085a

TA的精华主题

TA的得分主题

发表于 2023-1-7 10:13 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
  1. let
  2.     源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
  3.     更改的类型 = Table.TransformColumnTypes(源,{{"编号", Int64.Type}, {"日期", Int64.Type}}),
  4.     分组的行 = Table.Group(更改的类型, {"编号"}, {{"日期", each Table.RemoveColumns(_,"编号")}}),
  5.     counts=List.Max(List.Transform(分组的行[日期],Table.RowCount)),
  6.     自定义= Table.SplitColumn(分组的行,"日期",each List.Combine(Table.ToRows(_)),counts)
  7. in
  8.     自定义
复制代码
数据多用powerquery更加方便,可以自动按照编号分组,以后可以自动更新。此方法供参考。

image.png

TA的精华主题

TA的得分主题

发表于 2023-1-7 15:47 | 显示全部楼层
let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    分组的行 = Table.Group(源, {"编号"}, {{"日期", each Table.Transpose( Table.RemoveColumns(_,"编号"))}}),
    #"展开的“日期”" = Table.ExpandTableColumn(分组的行, "日期", {"Column1", "Column2", "Column3"}, {"Column1", "Column2", "Column3"}),
    重命名的列 = Table.RenameColumns(#"展开的“日期”",{{"Column1", "日期1"}, {"Column2", "日期2"}, {"Column3", "日期3"}})
in
    重命名的列

TA的精华主题

TA的得分主题

发表于 2023-1-8 10:41 | 显示全部楼层
office365
e2=DROP(DROP(UNIQUE(A:A),1),-1)
f2=TRANSPOSE(FILTER(B:B,A:A=E2))
下拉
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-6-29 15:07 , Processed in 0.043765 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表