[發問] 請教如何把橫式表格符合條件資料改成直式另列在一個工作表內

myshowin

我試了好久，都試不出來，拜託高手幫忙提點，感謝
※代碼為手動輸入
職工編號        2/1        2/2        2/3        2/4        2/5        2/6        2/7        2/8        2/9        2/10
610007        8        8        1                        1                1        1        1
610012        1        1        1                        8        8        1        1        1
610015                1        8                        1        1        8        8        8
610017        1        1        1                        1        8        8        1        1
610022        1        1        1        7        7        1                1        1        1

※符合代碼為8或7的資料，依下面的格式顯示
職工編號        日期        代碼
610007        2月1日        8
610007        2月2日        8
610012        2月6日        8
610012        2月7日        8
610015        2月3日        8
610015        2月8日        8
610015        2月9日        8
610015        2月10日        8
610017        2月7日        8
610017        2月8日        8
610022        2月4日        7
610022        2月5日        7

PJChen

回復 27# Hsieh

謝謝版主耐心的教導,成功了!

Hsieh

回復 26# PJChen

下載 (225.86 KB)

2012-2-9 17:35

PJChen

回復 24# Hsieh
14F朋友昨天有提過,我也試了,結果是沒有作用.

myshowin

回復 21# Hsieh

我太笨，昨天自已試著修改了幾個小時，總是會有少，
原來問題出在下面藍字的地方
非常感謝您的解答，我獲易良多

以下是超級版主Hsieh 教學原文：
M2陣列公式
=IF(ROW(A2)>(COUNTIF($B$2:$K$6,7)+COUNTIF($B$2:$K$6,8)),"",INDIRECT("A"&MOD(SMALL(IF(($B$2:$K$6>6)*($B$2:$K$6<9),--(COLUMN($B$2:$K$6)*100&ROW($B$2:$K$6)),""),ROW(A2)),100)))
N2陣列公式
=IF(M2="","",INDIRECT("R1C"&SMALL(IF((INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),)>6)*(INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),)<9),COLUMN(INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),0)),""),COUNTIF($M$1:M2,M2)),0))
O2陣列公式
=IF(N2="","",INDEX($A$1:$K$6,MATCH(M2,$A$1:$A$6,0),MATCH(N2,$A$1:$K$1,0)))

Hsieh

回復 23# PJChen


    直接在尋找目標內使用ALT+160

PJChen

回復 22# Hsieh

謝謝您找到了問題的所在,在數字鍵輸入Alt+160確實可以產生一個空白字元,但無法將它copy貼上並取代為其它字元,無論我是直接copy儲存格,或將空白字元反黑選取都無法copy!

Hsieh

回復 20# PJChen

你應該是使用鍵盤上排的數字，使用字元碼輸入必須按住ALT+數字鍵

下載 (19.46 KB)

2012-2-7 23:50

Hsieh

回復 19# myshowin

M2陣列公式
=IF(ROW(A2)>(COUNTIF($B$2:$K$6,7)+COUNTIF($B$2:$K$6,8)),"",INDIRECT("A"&MOD(SMALL(IF(($B$2:$K$6>6)*($B$2:$K$6<9),--(COLUMN($B$2:$K$6)*100&ROW($B$2:$K$6)),""),ROW(A2)),100)))
N2陣列公式
=IF(M2="","",INDIRECT("R1C"&SMALL(IF((INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),)>6)*(INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),)<9),COLUMN(INDEX($B$1:$K$6,MATCH(M2,$A$1:$A$6),0)),""),COUNTIF($M$1:M2,M2)),0))
O2陣列公式
=IF(N2="","",INDEX($A$1:$K$6,MATCH(M2,$A$1:$A$6,0),MATCH(N2,$A$1:$K$1,0)))

下載 (24.66 KB)

2012-2-7 23:43

PJChen

回復 18# register313
我依你建議在word中照著方法確實可以完成,但本著求知的精神,我真的很想知道在Excel中我的動作到底哪裡有問題,為什麼Angel教我的卻無法完成?而只是出現一些怪怪的畫面?另外我又有一個新發現,我將有空格的文字格式複製到一個新的工作表中貼上,尚未存檔的,一樣在任一儲存格中Alt+160(60還沒按),就出現另存新檔的對話框,我真的弄不明白,我很想完成Angel教的方法,但一直有問題,有誰也可以幫忙試試看要如何操作?