24为excel表格中所代表的24个数据，并非连续的1—24个数字，所得结果没
所得结果每组分别存入一个表格中
excel 24选5所有排列组合(数字不重复),求用VBA编程方法及相关程序。
答案:2 悬赏:20 手机版
解决时间 2021-02-21 02:46
- 提问者网友：蓝莓格格巫
- 2021-02-20 17:14
最佳答案
- 五星知识达人网友：不想翻身的咸鱼
- 2021-02-20 18:44
既然24个数据不是1~24，那从哪里得到这些数据呢？如果在单元格里，又是在哪些单元格呢？
全部回答
- 1楼网友：夜余生
- 2021-02-20 19:28
dim i%, k%
sub s()
arr = [a1].currentregion
for i = 1 to ubound(arr)
k = 3
p arr(i, 1)
next
end sub
sub p(byval t1$, optional byval t2$ = "")
dim l%, t$, tt1$, tt2$
l = len(t1)
if l = 1 then
cells(i, k) = t2 & t1
k = k + 1
else
for j = 1 to l
t = mid(t1, j, 1)
tt1 = replace(t1, t, "", , 1)
tt2 = t2 & t
p tt1, tt2
next
end if
end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯