Re: [算表] 請教Excel大量資料搬移的問題

看板Office作者 (windknife18)時間16年前 (2009/07/16 11:20), 編輯推噓1(104)
留言5則, 3人參與, 最新討論串2/2 (看更多)
VBA 看起來好像比較容易,不過亦可使用公式 假如你的資料在 A-C D1 =IF(INDEX(A:C,(ROWS($1:1)-1)/3+1,MOD(ROWS($1:1)-1,3)+1)="","", INDEX(A:C,(ROWS($1:1)-1)/3+1,MOD(ROWS($1:1)-1,3)+1)) 往下拉 E1 =IF(ROWS($D$1:D1)<=SUM(--($D$1:$D$100<>"")),INDEX($D$1:$D$100, SMALL(IF($D$1:$D$100<>"",ROW($D$1:$D$100),""),ROWS($D$1:D1))),"") 輸入完要記得按 Ctrl+Shift+Enter 結束 往下拉 E 欄就是你想要的資料 上面公式內的資料筆數可以自行修正 ※ 引述《ksk0516 (ksk0516)》之銘言: : 軟體:MS Excel : 版本:MS Excel 2003 or 2007 : 不好意思標題取的不好 : 以實例說明會比較清楚:p : 原本的資料長這樣: : 1 A B C : 2 A B : 3 A C : 4 B : 想整理成這樣: : 1 A : 1 B : 1 C : 2 A : 2 B : 3 A : 3 C : 4 B : 目前想到只有用vlookup的作法 : 不過需要不斷複製貼上... : 資料量還滿龐大的 : 不知道有沒有板友可以指點迷津呢? : 謝謝:) -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.229.85.142

07/18 10:21, , 1F
感謝!
07/18 10:21, 1F

07/18 21:46, , 2F
^^
07/18 21:46, 2F

02/21 11:20, , 3F
=IFERROR(INDIRECT("r"&SUBSTITUTE(SMALL(IF(A$1:C$4<>"",
02/21 11:20, 3F

02/21 11:20, , 4F
ROW($1:$4)+COLUMN(A:C)/10),ROW()),".","c"),0),"")
02/21 11:20, 4F

02/21 11:20, , 5F
陣列公式需ctrl+shift+enter,不用內文d1
02/21 11:20, 5F
文章代碼(AID): #1ANfntzX (Office)
文章代碼(AID): #1ANfntzX (Office)