返回列表 上一主題 發帖

[發問] 資料轉置的小問題

[發問] 資料轉置的小問題



這個轉置的方式,我爬文爬爬找不到類似的方式
可是又覺得應該是很簡單~類似文章應該有類似的

在某個文章有看到下面的代碼:
Sub test()
    Dim arr
    arr = Range("a1:c3")
    Range("f1").Resize(UBound(arr, 2), UBound(arr)) = Application.WorksheetFunction.Transpose(arr)
End Sub

很簡單的就轉置了~
可是他是整個資料範圍轉置

但我只想要如圖示的,轉置後資料變成兩欄中就好
懇請大大們 指點一二

回復 2# lpk187


    :loveliness:
可以使用~~神來一解~~
每次都是大大解惑之
太感謝了~:)
學習中~

TOP

[版主管理留言]
  • GBKEE(2015/7/2 07:00): 附檔案看看

回復 4# GBKEE

wow~謝謝版大提供這種方式~
那有無可以反轉回去呢?

就像是此例,可以轉乘兩資料欄
如果只有兩資料欄~可以轉回去陣列的樣式嗎?

TOP

回復 4# GBKEE

板主大大~
其實是想詢問,如下圖
左圖:經過大大的程式碼,已經可以轉置了

但如果反過來,給的是右圖
怎麼將F G 欄位 ,轉成 I J K呢?

  

TOP

回復 9# GBKEE

謝謝G大
不過真如樓上所說的,若有AA1,AM1這樣的字眼的時候
就會出現型態不符合

我快速抓了一份資訊,如附件,轉換的時候
會出現型態不符合

    test0703.rar (22.26 KB)

TOP

        靜思自在 : 君子為目標,小人為目的。
返回列表 上一主題