直到第2.点的部分，可用word或excel来完成， 不需即时更新、不想写公式可用word，反之则用excel。 Word可参考 #190vV3I8 7421 110/26 evy155 □ [请问] EXCEL转置 虽然是"逆过程"不过有一处不同，"组"的後面不换行，因此结论是 - 从excel贴到word，"保留纯文字" - 执行两个取代动作 1. ^t → ^p^t 2. 组^p → 组 - 贴回excel，完成 万一"第一组"只是举例，实际上最後一个字("组")不一定相同，也许就还是要excel了~ http://2y.drivehq.com/p/SameColumn.xls Excel公式，因为每组资料不一样多，需计算各组个数 为使计算效率高与其他一些考量，将公式分开写(也就是有好几条式子) 假设资料置於"data"工作表，则转换工作表公式如下 (初使值) A1 B1 C1 =ROW(data!$A$1) =COUNTA(INDEX(data!$B:$IV,A1,)) 1 原资料的开头位置 第一组笔数 栏位参数 (接下来累计笔数计算公式) A2 =IF(ROW(1:1)<B1,A1,A1+1) B2 =IF(ROW(1:1)<B1,B1,B1+COUNTA(INDEX(data!$B:$IV,A2,))) C2 =IF(A1=A2,C1+1,1) 至此所需的座标(A.C栏)已计算完成，参照之 D1 E1 =INDEX(data!$A:$A,A1)&"" =INDEX(data!$B:$IV,A1,C1)&"" D2 =IF(A1=A2,"",INDEX(data!$A:$A,A2)&"") 完成原问题第2.点之进度。 接下来第3.点，不论前面是用Word或Excel都可以接下去 Word处理完就贴到D.E栏就一样了 这部分的公式原理参考 #17zepYsA 5261 m 3 4/05 JieJuen □ [算表] Excel FAQ: 用OFFSET 转置.分行 =OFFSET($D$1,ROW(1:1)-1+25*(INT((COLUMN(A:A)-1)/2)),MOD(COLUMN(A:A)-1,2))&"" 完成. 注:上面公式最後加上 &"" 是为了不要出现0(data没有值的时候) ※ 引述《zacchen926 (zac)》之铭言： : 软体:execl : A B C D : 1 第一组 资料1 资料2 : 2 第二组 资料3 资料4 资料5 : 3 第三组 资料6 : 4 第四组 资料7 : ==== 变成以下 ================================ : A B C D : 1 第一组 资料1 : 2 资料2 1.每组的资料并不一样多，有的一组二个 : 有的一组有三个，但最大部份是一组一个 : 3 第二组 资料3 : 2.希望能保留 A 列会有「第一组」「第二组」 : 4 资料4 这样比较方便 : 5 资料5 3.最後请问要如何让 A B 两列成为25个一排 : 第26开始就直接在 C1 D1开始显示 : 6 第三组 资料6 这样印出来才方便 : 7 第四组 资料7 --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 218.164.51.13 ※ 编辑: JieJuen 来自: 218.164.49.56 (11/19 05:29) ※ 编辑: JieJuen 来自: 218.164.49.72 (05/11 19:08)