文件格式轉換縱向轉橫向,橫向轉縱向

vba excel vba

AnakinTai 2020-11-16 11:07:25 ‧ 1907 瀏覽

如何將資料表從縱向轉橫向和橫向轉縱向互換，在新工作表呈現。
橫向

縱向

如果在縱向轉橫向我可以用公式，但用VBA我就想不到了.
之後我又想到把他橫向轉縱向，我又發現我連這個公式都不會.(主要是出現多次員工號),求大神們指點.

看更多先前的討論...收起先前的討論...

paicheng0111 iT邦大師 5 級 ‧ 2020-11-16 12:17:37 檢舉

樞紐分析表

AnakinTai iT邦新手 5 級 ‧ 2020-11-16 12:49:57 檢舉

樞紐分析表是可以解決橫向變縱向主要是出現多次員工號姓名問題,現時一個月30天我還是可以慢慢在樞紐分欄位中的列每個勾選但日期增多時我還是會手抽筋.

RoT iT邦新手 5 級 ‧ 2020-11-16 15:36:29 檢舉

AnakinTai, 你好

請問你是要利用 VBA 達成橫向 <--> 縱向, 互轉嗎?

你說縱向 --> 橫向, 可以使用公式達成

又需要橫向 --> 縱向, 但無法使用公式完成

從上述資料來看, 橫向 --> 縱向的問題是, 在 A欄(員工號) / B欄(姓名) 會有問題

而從縱向 --> 橫向, 又要回到原始資料這樣嗎?

歡迎討論

AnakinTai iT邦新手 5 級 ‧ 2020-11-16 17:18:11 檢舉

RoT
其實是2件事來的.
有時候我要把縱向的資料變成棋向，
但別人會給我橫向的資料,我想變成縱向方便我作統計。
我是想把他轉變後在另一個工作表上呈現

登入發表討論

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

2 個回答

ccenjor

iT邦高手 1 級 ‧ 2020-11-16 19:59:24

最佳解答

A2公式：
=INDIRECT("工作表1!R"&QUOTIENT(ROW()-2,COUNTA(工作表1!$C$1:$I$1))+2&"C1",0)
B2公式：
=INDIRECT("工作表1!R"&QUOTIENT(ROW()-2,COUNTA(工作表1!$C$1:$I$1))+2&"C2",0)
C2公式：
=INDIRECT("工作表1!R1"&"C"&MOD(ROW()-2,COUNTA(工作表1!$C$1:$I$1))+3,0)
D2公式：
=INDIRECT("工作表1!R"&QUOTIENT(ROW()-2,COUNTA(工作表1!$C$1:$I$1))+2&"C"&MOD(ROW()-2,COUNTA(工作表1!$C$1:$I$1))+3,0)
工作表1!$C$1:$I$1是第一列日期的範圍，可自行依照需求調整。
若複製範圍超過筆數X日期數會出現0值。

回應 5
分享
檢舉

看更多先前的回應...收起先前的回應...

AnakinTai iT邦新手 5 級 ‧ 2020-11-17 09:28:58 檢舉

這個是橫變縱的,很複雜呢..

RoT iT邦新手 5 級 ‧ 2020-11-17 13:19:29 檢舉

AnakinTai, 你好

你是需要使用 Excel VBA, 橫向 <--> 縱向嗎?

歡迎討論 - RoT

AnakinTai iT邦新手 5 級 ‧ 2020-11-18 12:15:56 檢舉

如果有VBA當然是好事,因為公式會令文案變得很大.

AnakinTai iT邦新手 5 級 ‧ 2020-11-18 12:22:08 檢舉

我也分享一下我縱向轉橫向的方法.
但第一欄和第一列都是要自己手動輸入一下.
INDEX(工作表2!$D:$D,MATCH(1,(工作表2!$A:$A=工作表3!$A2)*(工作表2!$C:$C=工作表3!C$1),0))
其實只是一個顯示方式.希望可以幫助有需要的朋友們.
畢竟我們都有一個無法理解的"上司/老闆"
我們只可以用方法去應對.