ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] 写了这段随机分配餐桌座位的代码,但是报错,急急急,求助

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-7-25 11:27 | 显示全部楼层
micch 发表于 2023-7-25 11:15
唉,论坛真的是很久没这么热闹过了。已经忘了以前各种假装虚心实在悄悄的装一把就跑的时光了。

咱也写 ...

老师的函数功底那是相当厉害,函数版块的大佬身份终究是藏不住了,哈哈。

TA的精华主题

TA的得分主题

发表于 2023-7-25 11:31 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
如果标紅人數太多, 每桌未標紅的人數就會低于9人!!!
每桌必須滿10人, 且不能讓多餘的標紅人數都集中在一桌//

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2023-7-25 11:34 | 显示全部楼层
micch 发表于 2023-7-25 11:15
唉,论坛真的是很久没这么热闹过了。已经忘了以前各种假装虚心实在悄悄的装一把就跑的时光了。

咱也写 ...

先献个鲜花为敬,感觉要转向学习函数模块去了

TA的精华主题

TA的得分主题

发表于 2023-7-25 11:36 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
准提部林 发表于 2023-7-25 11:31
如果标紅人數太多, 每桌未標紅的人數就會低于9人!!!
每桌必須滿10人, 且不能讓多餘的標紅人數都集中在一桌 ...

原来如此,我说怎么看他的描述,总觉得看不懂是要干啥。我以为是必须9人一组的基础上排红色人员,那就换个参数吧

TA的精华主题

TA的得分主题

发表于 2023-7-25 11:46 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
  1. =WRAPCOLS(SORTBY(A2:A236,B2:B236+RANDARRAY(235)),24,"")
复制代码

每桌人数固定已知,那就桌数就更好算了,直接除以10,有余加1桌好了

TA的精华主题

TA的得分主题

发表于 2023-7-25 12:02 | 显示全部楼层
tomxie 发表于 2023-7-25 11:47
相比 那些 函数一重接一重套函数,每个还有 N 多个 参数, 让人看着都头疼欲裂,下面这句简直是简单到无敌。 ...

ntitle是简单的很,可惜Excel不支持,你可以要求做日常行政事务工作的人也使用数据库,然后你就可以把你写好的代码发给他,让他拿去用了(他不会就去学数据库怎么用)。

既然他给出了Excel文件,那么我把公式写好,他只要复制到编辑栏,回车就完成了。

对于你来说头疼欲裂的参数,对于这里很多人,不过是信手拈来的技术而已。
我也可以解释一下,虽然我觉得Excel函数本身就很简单不需要讲也能看懂

=WRAPCOLS(SORTBY(A2:A236,B2:B236+RANDARRAY(235)),24,"")

sortby,对A列人名,按普通人员和特例人员不同+随机数进行排序,实现打乱人名的目的,
(并且还保证了"特例人员"均匀分到每一桌中,不足就每桌一个人有个别桌空缺;超过桌数,就平均分到每桌,保证每桌都有特例人员。只是sortby搭配一组随机数字就实现了)
wrapcols,对随机打乱的人,自动按桌数分开输出就行了。

image.jpg

TA的精华主题

TA的得分主题

发表于 2023-7-25 12:06 | 显示全部楼层
本帖最后由 micch 于 2023-7-25 12:07 编辑
tomxie 发表于 2023-7-25 11:36
可能 人家红色要放在首席,你却放在最后,例如 第6桌 居然断了,最后一桌 都有,感觉很不符合现实情况啊 ...

知道为什么很多人都没给楼主解决问题吗,因为他对问题的描述,就是常见的普通人日常工作状态,知道自己要做什么,但是不知道如何表达让别人听懂。

红色属于特例人员,平均分到每桌去,如果桌数多余人数,那就每桌一个,有的桌没特例人员。
如果红色人数多于桌数,那不能出现有的桌子一个红色人员都没有的情况,要保证每桌都有。

所以235人需要24桌的情况下,不足24个特例人员,必然有的桌子上是空的,至于哪一桌是所谓领导桌,他的表述和数据,都没体现出这一点。

你的SQL水平我不会去评价,因为我不懂,但是你如果真心想表现出你的能力,解决问题就行了,不需要招摇显摆,你的代码有没有解决问题,我都不知道,所以不予评价。

TA的精华主题

TA的得分主题

发表于 2023-7-25 12:16 | 显示全部楼层
micch 发表于 2023-7-25 12:06
知道为什么很多人都没给楼主解决问题吗,因为他对问题的描述,就是常见的普通人日常工作状态,知道自己要 ...

那就等帖主來論斷!!!
不會用的就當堆肥~~
會用的, 就算是垃圾, 也有回收再利用的價值~~

這帖沒其他人來回...原因不是帖主沒說明白, 而是...(???)

TA的精华主题

TA的得分主题

发表于 2023-7-25 12:56 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
tomxie 发表于 2023-7-25 12:32
黄金、白金、钻石 在狗的面前 怎么会有 一根别人丢掉的骨头 更有吸引力 ?

这句话说对了,你的代码再香,在我初学者眼里也是垃圾一样,因为我不会用,也不理解。我只会用我会用的代码解决问题,至于更高深也只会在我学习了以后才会用,所以不要再装逼了,这里就是一个初级学习者的园地,不是你这样装逼范的天地。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-17 07:33 , Processed in 0.042472 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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