求助不规则考场编排代码

liutao0987

3190496160 发表于 2023-3-28 10:46
肯定是可以的，但是，代码逻辑就不是现在的逻辑了，

谢谢  还得好好写逻辑

chxw68

修改成随机的了。

lizhipei78

考场手工分配模板.rar (28.35 KB, 下载次数: 17)

2023-3-28 12:36 上传

点击文件名下载附件

用函数给你写了一个，重复取数，VLOOKUP、XLOOKUP都是可以的

liutao0987

chxw68 发表于 2023-3-28 12:24
修改成随机的了。

For i = 1 To UBound(arr) - 1
            m = Int(Rnd() * (UBound(arr) - i)) + i + 1
            For Each x In Array(5, 6, 8)
                temp = arr(i, x)
                arr(i, x) = arr(m, x)
                arr(m, x) = temp
            Next
        Next

您好  能给解释一下吗  看不懂

xunanming

练手一下.按考场编排职位乱序号.

chxw68

liutao0987 发表于 2023-3-28 16:49
For i = 1 To UBound(arr) - 1
            m = Int(Rnd() * (UBound(arr) - i)) + i + 1
            ...

打乱顺序。

liutao0987

xunanming 发表于 2023-3-29 19:05
练手一下.按考场编排职位乱序号.

非常感谢，和我的要求一样了，解决了

熊文来

这个文件用的不多，可以保存

skyhawk0012

感谢各位分享，学习学习！