集合 发表于 2021-10-20 11:16:00

生成随机排序问题

根据要求生成随机排序

古伦帝 发表于 2021-11-23 15:49:31

VBA，设置个数与列数后，单击运行。
注意，我设定了个数/列数必须为整数，不符合时会有提示

雅口无言 发表于 2021-12-1 21:29:45

厉害，实现了需要的效果，慢慢研究语句。谢谢！

鱼是乎 发表于 2021-12-6 20:49:47

语句挺简单的，主体是遍历，缺点是数据量很大的话，会卡，你要求的这个量级的话，应该没问题

云屿 发表于 2021-12-24 09:14:31

数据量足够我使用了，谢谢。

山木旅游一许鄢总部 发表于 2022-1-19 11:53:36

F2 右拉 下拉 (由上往下){=IFERROR(IF((COLUMN(A1)>$B$2)+(ROW(A1)>ROUNDUP($B$1/$B$2,)),"",SMALL(IF((COUNTIF($F$1:$K1,ROW(INDIRECT("1:"&$B$1)))=0)*(COUNTIF($E2:E2,ROW(INDIRECT("1:"&$B$1)))=0),ROW(INDIRECT("1:"&$B$1))),RANDBETWEEN(1,$B$1+1-(ROW(A1)-1)*$B$2-COLUMN(A1)))),"")
M2 右拉 下拉 (由左往右){=IFERROR(IF((COLUMN(A1)>$B$2)+(ROW(A1)>ROUNDUP($B$1/$B$2,)),"",SMALL(IF((COUNTIF($L$2:L$16,ROW(INDIRECT("1:"&$B$1)))=0)*(COUNTIF(M$1:M1,ROW(INDIRECT("1:"&$B$1)))=0),ROW(INDIRECT("1:"&$B$1))),RANDBETWEEN(1,$B$1+1-ROW(A1)-(COLUMN(A1)-1)*ROUNDUP($B$1/$B$2,)))),"")
B4{=AND(COUNTIF(F:K,ROW(INDIRECT("1:"&$B$1)))=1)
B5{=AND(COUNTIF(M:R,ROW(INDIRECT("1:"&$B$1)))=1)
页: [1]
查看完整版本: 生成随机排序问题