|
楼主 |
发表于 2010-8-29 05:58
|
显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
shaowu459 的给的s型考场座次的三种排法(都是多单元格数组公式)
方法一:
=IF(MOD(COLUMN(),2),T(OFFSET(A1,CHOOSE(MOD(INT(COLUMN(A:H)/2.1),2)+1,ROW(1:8),9-ROW(1:8))+INT(COLUMN(A:H)/2.1)*8-1,MOD(COLUMN(),2))),N(OFFSET(A1,CHOOSE(MOD(INT(COLUMN(A:H)/2.1),2)+1,ROW(1:8),9-ROW(1:8))+INT(COLUMN(A:H)/2.1)*8-1,MOD(COLUMN(),2))))
经过修改更新后的方法:
方法二:
=T(INDIRECT(CHOOSE(MOD(COLUMN(),2)+1,"A","B")&CHOOSE(MOD(INT(COLUMN(A:H)/2.1),2)+1,ROW(1:8),9-ROW(1:8))+INT(COLUMN(A:H)/2.1)*8))
方法三:
=T(OFFSET(A1,CHOOSE(MOD(INT(COLUMN(A:H)/2.1),2)+1,ROW(1:8),9-ROW(1:8))+INT(COLUMN(A:H)/2.1)*8-1,MOD(COLUMN(),2)))
[ 本帖最后由 lhx120824 于 2010-8-29 06:01 编辑 ] |
|