ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] 有隔断进行升序,降序

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-3-3 19:57 | 显示全部楼层 |阅读模式
请问表中中间有隔断的,我想要升序,降序的话,要怎么操作啊,谢谢,请指定一下!

AA.rar

46.35 KB, 下载次数: 12

TA的精华主题

TA的得分主题

发表于 2024-3-3 20:44 | 显示全部楼层
请参考附件,vba法

AA.rar

71.67 KB, 下载次数: 11

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-3-3 22:33 | 显示全部楼层
  1. let
  2.   源 = Excel.CurrentWorkbook(){[Name = "表1"]}[Content],
  3.   更改的类型 = Table.TransformColumnTypes(
  4.     源,
  5.     {
  6.       {"序号", Int64.Type},
  7.       {"单位", type text},
  8.       {"部门", type text},
  9.       {"量体师", Int64.Type},
  10.       {"性别", type text},
  11.       {"身高", Int64.Type},
  12.       {"体重", Int64.Type},
  13.       {"净胸围", Int64.Type},
  14.       {"净中腰", Int64.Type},
  15.       {"净臀围", Int64.Type},
  16.       {"净横档", Int64.Type},
  17.       {"裤长", Int64.Type},
  18.       {"版长", Int64.Type},
  19.       {"腰版", Int64.Type},
  20.       {"净裤长", Int64.Type},
  21.       {"净腰围", Int64.Type},
  22.       {"净臀围2", type number},
  23.       {"休闲裤", type text},
  24.       {"裤长3", Int64.Type},
  25.       {"腰围", Int64.Type},
  26.       {"数字", Int64.Type},
  27.       {"英文", type text},
  28.       {"裤长4", Int64.Type},
  29.       {"腰围5", Int64.Type},
  30.       {"备注", type text},
  31.       {"休闲裤6", Int64.Type}
  32.     }
  33.   ),
  34.   分组的行 = Table.Group(
  35.     更改的类型,
  36.     "序号",
  37.     {{"all", each Table.Sort(_, {"序号"})}},
  38.     0,
  39.     (x, y) => Number.From(y = null)
  40.   ),
  41.   删除的列 = Table.RemoveColumns(分组的行, {"序号"}),
  42.   #"展开的“all”" = Table.ExpandTableColumn(
  43.     删除的列,
  44.     "all",
  45.     {
  46.       "序号",
  47.       "单位",
  48.       "部门",
  49.       "量体师",
  50.       "性别",
  51.       "身高",
  52.       "体重",
  53.       "净胸围",
  54.       "净中腰",
  55.       "净臀围",
  56.       "净横档",
  57.       "裤长",
  58.       "版长",
  59.       "腰版",
  60.       "净裤长",
  61.       "净腰围",
  62.       "净臀围2",
  63.       "休闲裤",
  64.       "裤长3",
  65.       "腰围",
  66.       "数字",
  67.       "英文",
  68.       "裤长4",
  69.       "腰围5",
  70.       "备注",
  71.       "休闲裤6"
  72.     },
  73.     {
  74.       "序号",
  75.       "单位",
  76.       "部门",
  77.       "量体师",
  78.       "性别",
  79.       "身高",
  80.       "体重",
  81.       "净胸围",
  82.       "净中腰",
  83.       "净臀围",
  84.       "净横档",
  85.       "裤长",
  86.       "版长",
  87.       "腰版",
  88.       "净裤长",
  89.       "净腰围",
  90.       "净臀围2",
  91.       "休闲裤",
  92.       "裤长3",
  93.       "腰围",
  94.       "数字",
  95.       "英文",
  96.       "裤长4",
  97.       "腰围5",
  98.       "备注",
  99.       "休闲裤6"
  100.     }
  101.   )
  102. in
  103.   #"展开的“all”"
复制代码

TA的精华主题

TA的得分主题

发表于 2024-3-3 23:52 | 显示全部楼层
参与一下,365版本函数
使用P列作为排序依据,如需更改请改变量序
目前默认升序,如需更改请改sortby的第五参数,升序为1,降序为-1
由于数据包含隐藏列,如需隐藏列加入结果中,请更改{1,5,13,14,15,16,17,18,23,24,25,26}
  1. =LET(a,CHOOSECOLS(A2:Z93,{1,5,13,14,15,16,17,18,23,24,25,26}),序,P2:P93,SORTBY(a,SCAN(1,序,LAMBDA(x,y,N(y=0)+x)),,(序>0)*序,1)&"")
复制代码



微信截图_20240303234714.png
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

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

GMT+8, 2024-12-24 07:31 , Processed in 0.041166 second(s), 15 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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