ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

   
EH云课堂-专业的职场技能充电站 限时送,魔方网表将Excel变在线系统 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
Excel不给力? 何不试试FoxTable! Excel 2016函数公式学习大典 高效办公必会的Office实战技巧 免费下载Excel行业应用视频
300集Office 2010微视频教程 Tableau-数据可视化工具 精品推荐-800套精选PPT模板,点击获取 ExcelHome出品 - VBA代码宝免费下载
你的Excel 2010实战技巧学习锦囊 欲罢不能, 过目难忘的 Office 新界面 Excel VBA经典代码实践指南
查看: 278|回复: 6
打印 上一主题 下一主题

[求助] 求助,这样的算法怎么写?把领导按职位等级大小顺序排列

[复制链接]

ag娱乐平台手机版,  惠普公司企业存储服务器部门负责营销的副总裁马克表示,使用双处理器模块的Integrity服务器将从下个月开始。使用mx2,Integrity服务器中最多将可以集成有128个处理器。

《极客出发》首期呈现的VR技术已经让人大开眼界,第二期节目组又开始探索更为神秘的“脑控技术”,央视名嘴高博与才子撒贝宁分别带领两支顶尖脑控技术团队,通过神秘黑屋、脑控购物、家电改造等三个环节全面破解“脑控”的秘密。 美国国务院:美俄新削减战略武器条约正式生效今年以来,宾阳县已累计抓获电信网络诈骗违法犯罪嫌疑人1143人,其中“网络诈骗犯罪在逃人员扑克牌”追逃对象190人。抓获电信网络诈骗违法犯罪嫌疑人数同比上升53%,电信网络诈骗案件破案数上升95.3%,发案数下降74.64%,涉案金额下降66%,涉嫌诈骗短信发送量下降92.8%。

TA的精华主题

TA的得分主题

跳转到指定楼层
1
发表于 2019-1-13 01:12 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
有几位领导,名字分别"李伙新、高定国、胡中冬、苏伟刚、罗扬凡",在填写文件呈批领导的时候必须依次按职位级别大小按顺序填写他们的名字,顺序为李伙新>高定国>胡中冬>苏伟刚>罗扬凡,但每次需要填写的领导不一样,比如有时候填三个领导,有时候填4个,2个领导,但为了方便填写单元格的时候没有按职位级别大小顺序来填写,要求按正确的顺序把领导进行排序。具体看附件。

呈批领导排序.zip

6.1 KB, 下载次数: 16

TA的精华主题

TA的得分主题

2
发表于 2019-1-13 02:02 | 只看该作者
  1. Sub main()
  2.     Dim arr, D As Object, js As Object, i As Long
  3.     Set D = CreateObject("htmlfile"): Set js = D.parentWindow
  4.     js.execScript "o={'李伙新':1,'高定国':2,'胡中冬':3,'苏伟刚':4,'罗扬凡':5}"
  5.     js.execScript "function fun(x,y){return o[x]-o[y]}"
  6.     arr = [A7:A13]
  7.     For i = 1 To UBound(arr)
  8.         arr(i, 1) = js.eval("a='" & arr(i, 1) & "'.split('、');a.sort(fun);a.join('、');")
  9.     Next
  10.     [B7:B13] = arr
  11. End Sub
复制代码

TA的精华主题

TA的得分主题

3
发表于 2019-1-13 05:11 | 只看该作者

TA的精华主题

TA的得分主题

4
发表于 2019-1-13 06:43 | 只看该作者
模拟了一个附件

1.rar

14.27 KB, 下载次数: 15

TA的精华主题

TA的得分主题

5
发表于 2019-1-13 11:01 来自手机 | 只看该作者

TA的精华主题

TA的得分主题

6
发表于 2019-1-14 13:08 | 只看该作者

TA的精华主题

TA的得分主题

7
发表于 2019-1-14 13:22 | 只看该作者

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关注官方微信,每天学会一个新技能

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

GMT+8, 2019-3-22 22:52 , Processed in 0.104431 second(s), 16 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Wooffice Inc.

   

沪公网安备 31011702000001号 ag娱乐平台手机版沪ICP备11019229号

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

快速回复 ag娱乐平台手机版 返回列表
中消协一天内收到73件华帝退款投诉 发出约谈函 军报:有的军工人“绝活”还不够多 需要警醒 ofo获阿里投资8.66亿美元 谁将主导ofo? 马云对话日本学生:别学比尔盖茨早退学 很少有人成功 我国发射人类首个月球中继卫星 将助力嫦娥四号登月 全国首例:团伙多次暴力冲卡逃费 8名司机被判刑 人民币连续贬值资本外流传言四起:监管企业忙澄清 吉林省旅游委主任谈雪乡宰客:要坚持绝不虚价迎客 微软AI翻译取得突破进展:准确率可与人类翻译媲美 解放军在俄参赛 向斯大林格勒保卫战纪念碑献花(图) 美22个检察长正式对FCC废除“网络中立”提起诉讼 联想杨元庆:大力发展行业智能 用AI武装各行各业
于英涛接任紫光股份董事长 赵伟国因工作繁忙辞职 巴萨今夏离队第一人敲定?大将疑似告别:结束了 围棋AI横空出世:是围棋圭臬亦或思维梏桎? 亚运名单公布方式史无前例 林丹孙杨们你最想看谁 刘昌赫名局系列2 第一攻击手屠龙破曹登大王宝座 朴槿惠下台后曾苦劝这个男人竞选总统 却遭拒绝 黄安谈骑车尾随“台独”:处处红灯 对方幻想成功 梅西的3个小秘密:比赛中喜欢拔草吃 第6感逆天 李盈莹:其实比联赛决赛紧张 盼不辜负郎导期望 军委战略部署:推进武警后勤保障纳入军队联保体系 曝杜兰特或明夏重回雷霆!他绝不会在勇士退役 崔世平代表:澳门对接粤港澳大湾区建设有四点优势
港媒称中国年轻消费者爱上社交电商:把购物当成乐趣 百度不需要“二号人物” 只有李彦宏才是老板 湖北黄冈遭遇狂风暴雨袭击致电力中断:树折车翻 应对美国威胁 大型汽车出口国要联合起来了? 直播答题没熬过春节 政策监管高压下集体退烧 新债王:美10年期国债收益率若升破3% 美股将全年下跌 曼城放弃7500万巨购!曝瓜帅弃皇马名将改买别人 公积金新变化 单位公积金缴存比降低对你影响多大 哈里夫妇推迟蜜月旅行 将参加查尔斯王子生日派对 德媒:朝驻德使馆从事秘密采购 部分可用于核武 又一支三外援球队无缘季后赛!同曦提前出局 京东获批首个国家级无人机物流配送试点企业 马布里:愿为中国国家队工作 中国是我的家乡 ag娱乐平台手机版