作者:乔山办公网日期:
返回目录:excel表格制作
在E列输入以下公式=A1&B1&INDEX(A1:D1,1,INT(RAND()*2+3))
何必用宏呢?用随机函数知,你按一下F9就会自动生成新一列数
D,E ,F中分道别输入
=OFFSET(A1,INT(RAND()*6)-1,0)
=OFFSET(B1,INT(RAND()*8)-1,0)
=OFFSET(C1,INT(RAND()*6)-1,0)
刚测试了下版,不知道怎么用RAND的时候总是偶尔会出点问题,修改了权下
=OFFSET(A1,INT(RANDBETWEEN(1,5))-1,0)
=OFFSET(B1,INT(RANDBETWEEN(1,7))-1,0)
=OFFSET(C1,INT(RANDBETWEEN(1,5))-1,0)
第一个问题,百要求数据列度没有其它数据:
=IF(ROW(A1)>COUNTA(A:A)*COUNTA(B:B),"",INDIRECT("A"&INT((ROW(A1)-1)/COUNTA(B:B))+1)&INDIRECT("B"&MOD(ROW(A1)-1,COUNTA(B:B))+1))
下拉;
第二个知问题,要道求数据列没回有其它数据:
=IF(ROW(A1)>COUNTA(A:A)*COUNTA(B:B)*COUNTA(C:C),"",INDIRECT("A"&INT((ROW(A1)-1)/(COUNTA(B:B)*COUNTA(C:C)))+1)&INDIRECT("B"&INT(MOD(ROW(A1)-1,COUNTA(B:B)*COUNTA(C:C))/COUNTA(C:C))+1)&INDIRECT("C"&MOD((ROW(A1)-1),COUNTA(C:C))+1))
下拉。
参考附件答。
可以参考百度经百验的做法:度
http://jingyan.baidu.com/article/20095761879734cb0721b4ef.html
里边通过 Microsoft Query 将 保存好的问excel的一列进行排列组答合。与你的需求一致内,照着做就可以了。
最终效果容如下图