在指定区域生成指定数量的指定字符

flower1209

希望按照“示例”显示方式，根据“说明”要求，在B-P列随机位置生成指定数量的指定字符，最好占满B-P列，中间可以显示空值，每行的指定字符和数量都一样，谢谢各位

橒♂蝣

=LET(M,TAKE(SORTBY({"A";"B";"C"},RANDARRAY(3,1)),1),
N,TAKE(SORTBY({"A";"B";"C"},RANDARRAY(3,1)),-1),
X,REPT("A",3-SUM((HSTACK(M,N)="A")*1))&REPT("B",4-SUM((HSTACK(M,N)="B")*1))&REPT("C",2-SUM((HSTACK(M,N)="C")*1))&REPT(" ",6),
Y,SORTBY(MID(X,SEQUENCE(,LEN(X)),1),RANDARRAY(1,13)),
RR,HSTACK(M,Y,N),
RR
)

橒♂蝣

=LET(A,TEXTSPLIT(Q3,"个",","),
M,TAKE(SORTBY(TAKE(A,,-1),RANDARRAY(ROWS(A),1)),1),
N,TAKE(SORTBY(TAKE(A,,-1),RANDARRAY(ROWS(A),1)),-1),
B,MMULT(1*(HSTACK(M,N)=TAKE(A,,-1)),SEQUENCE(COLUMNS(A))^0),
X,VSTACK(HSTACK(TAKE(A,,-1),--TAKE(A,,1)-B),HSTACK(" ",15-SUM(--TAKE(A,,1)))),
Z,CONCAT(REPT(TAKE(X,,1),TAKE(X,,-1))),
Y,SORTBY(MID(Z,SEQUENCE(,LEN(Z)),1),RANDARRAY(1,13)),
RR,HSTACK(M,Y,N),RR
)

世界客都

供参考


参考.zip (8.57 KB, 下载次数: 13)

2023-11-30 15:45 上传

点击文件名下载附件

世界客都

可按F9不断刷新随机效果

comeet

1. =LET(t,TEXTSPLIT(Q3,,","),m,TEXTBEFORE(t,"个"),a,VSTACK(t,(15-SUM(--m))&"个"&"#"),b,DROP(REDUCE("",a,LAMBDA(x,y,HSTACK(x,EXPAND(TEXTAFTER(y,"个"),,TEXTBEFORE(y,"个"),TEXTAFTER(y,"个"))))),,1),SUBSTITUTE(SORTBY(b,RANDARRAY(,15)),"#",""))

复制代码

hcm19522

區域數組公式 反白 OK 但結果不對 求解=LOOKUP(RIGHT(SMALL(RANDBETWEEN(ROW(1:15)^0,99)/1%+ROW($1:$15),COLUMN(A:O)),2)-1,SUBTOTAL(9,OFFSET(Q3,,,,{1;2;3;4})),R$2:U$2)&""

无关岁月

hcm19522 发表于 2023-11-30 16:29
區域數組公式 反白 OK 但結果不對 求解=LOOKUP(RIGHT(SMALL(RANDBETWEEN(ROW(1:15)^0,99)/1%+ROW($1:$15),C ...

365没问题，版本原因吧

mykitami

这个问题非常适合用递归函数来解决，确保首尾不出现空。
先定义名称fx
公式输入
=LAMBDA(q,n,LET(all,TEXTSPLIT(q,",",,1),a,--TEXTBEFORE(all,"个"),b,TEXTAFTER(all,"个"),e,EXPAND(DROP(REDUCE("",b,LAMBDA(x,y,HSTACK(x,EXPAND(y,1,HLOOKUP(y,VSTACK(b,a),2,),y)))),,1),1,n,""),s,SORTBY(e,RANDARRAY(1,n,1,n,0)),IF(AND(TAKE(s,,1)<>"",TAKE(s,,-1)<>""),s,fx(q,n))))

这样就相当于自定义了一个函数  =fx(q,n)   有两个参数：q 代表类似Q列单元格的样式（如："3个A,4个B,2个C" 这样的字符串，或直接引用Q3），n代表列数，如：15
以本例B3单元格为例，输入
=fx(Q3,15)
然后下拉

jisijie630

看一看，对不对？