如何在 Excel 中將儲存格資料由左至右轉置？

作者Sun修改日期2024-11-11

當您在 Excel 工作表中輸入數值時，通常會由左至右依序填入；但在某些情況下，您可能希望將儲存格資料轉置為由上至下排列（如下方截圖所示）。雖然 Excel 本身未內建可快速實現此需求的功能，但本文將為您介紹幾種實用技巧，協助您輕鬆達成目標。
顯示 Excel 中從左至右轉置儲存格的螢幕截圖

使用 VBA 將儲存格由左至右轉置

使用 Kutools for Excel 將儲存格由左至右或由上至下轉置

使用 VBA 將儲存格由左至右轉置

若想不使用公式，快速將儲存格資料由左至右轉置，可運用 VBA 程式碼輕鬆達成。

1. 按下 Alt + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗！

2. 點擊插入 > 模組，並將下方程式碼貼到空白指令稿中。

VBA：由左至右轉置

Sub RearrangeColumns()
'UpdatebyExtenoffice20161125
  Dim xLng, i As Long, LastRow As Long, Letters As Variant, NewLetters As Variant
  Dim strTemp As String
 
  On Error Resume Next
    strTemp = Application.InputBox _
    (Prompt:="Enter the column you want to transpose with comma separate", _
    Title:="Kutools For Excel", Type:=2)
    For i = Len(strTemp) To 1 Step -1
       NewOrder = NewOrder + Mid(strTemp, i, 1)
    Next i

  LastRow = Cells.Find(What:="*", SearchOrder:=xlRows, _
            SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
  Letters = Split(NewOrder, ",")
  ReDim NewLetters(1 To UBound(Letters) + 1)
  Application.ScreenUpdating = False
  For xLng = 0 To UBound(Letters)
    NewLetters(xLng + 1) = Columns(Letters(xLng)).Column
  Next
  Application.ScreenUpdating = True
  Range("A1").Resize(LastRow, UBound(Letters) + 1) = _
  Application.Index(Cells, Evaluate("ROW(1:" & LastRow & ")"), NewLetters)
End Sub

Excel 中 Microsoft Visual Basic for Applications 視窗並輸入 VBA 程式碼的螢幕截圖

3. 按下 F5 鍵執行程式碼後，將出現一個對話方塊，請輸入您要轉置的欄字母，並以逗號分隔，如下方截圖所示。
Excel VBA 中用於輸入要從左至右轉置之欄位的對話方塊螢幕截圖

4. 點擊確定，所選範圍即由左至右完成轉置。

使用 Kutools for Excel 將儲存格由左至右或由上至下轉置

若您已安裝 Kutools for Excel，即可透過「垂直翻轉範圍」與「水平翻轉選區」功能，快速將儲存格內容由左至右或由上至下轉置。

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

安裝 Kutools for Excel 後，請依下列步驟操作：（立即免費下載 Kutools for Excel！）

選取您要由左至右或由上至下轉置的儲存格，點擊 Kutools > 範圍 > 水平翻轉選區／垂直翻轉範圍，再選擇全部或僅翻轉內容。請參閱以下截圖：
Excel 中選取 Kutools「水平翻轉範圍」選項的螢幕截圖

水平翻轉選區 > 全部：

水平翻轉 > 僅翻轉內容：

垂直翻轉範圍 > 全部：	垂直翻轉範圍 > 僅翻轉內容：

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

示範：使用 Kutools for Excel 將儲存格由左至右或由上至下轉置

Kutools for Excel：超過 300 種實用工具隨手可得！盡享 AI 驅動功能，讓工作更聰明、更快速！立即下載！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多