A6=INDIRECT(TEXT(SMALL(ROW($A$1:$C$4)*100+COLUMN($A$1:$C$4),COLUMN(A1)),"r0c00"),)&""
数组公式向右复制【数组公式，公式输完后，光标放在公式编辑栏同时按下CTRL+SHIFT+回车键，使数组公式生效】
不论多少行列都适用。
具体看你的表了，把表的格式写清楚，给你弄个宏
