如何在 Excel 中交換行或列的內容？

有時候，當我們使用工作表時，需要交換行或列。例如，我想將 A 列與 D 列進行交換，第一個想到的方法就是使用複製和貼上命令。事實上，除了複製和貼上之外，還有一些其他方法可以解決這個問題。

使用 VBA 程式碼交換行或列

使用 Kutools for Excel 快速便捷地交換行或列

使用 Kutools for Excel 將資料從行轉置到多列

使用 VBA 程式碼交換行或列

1. 按住 ALT + F11 鍵，打開 Microsoft Visual Basic for Applications 視窗。

2. 點擊 插入 > 模組，然後將以下程式碼粘貼到模組視窗中。

Sub SwapTwoRange()
'Updateby Extendoffice
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

3然後點擊 按鈕運行程式碼，會彈出一個對話框讓您選擇要交換的兩個區域，請參閱截圖：

4. 點擊確定後，這兩個區域就會被交換。請參閱截圖：

使用 Kutools for Excel 快速便捷地交換行或列

對於剛接觸 Excel 的用戶來說，代碼可能比較困難，是否有更簡單快速且節省時間的方法呢？當然，Kutools for Excel 可以幫助您快速舒適地交換行或列。

如果您已經安裝了 Kutools for Excel，您可以快速交換兩列或兩行。

1. 點擊 Kutools > 區域 > 交換區域，請參閱截圖：

2. 在 交換區域 對話框中，點擊 按鈕從 交換的區域1 選擇您想要交換的 A 列，然後點擊 按鈕從 交換的區域2 選擇 D 列。（ 注意：用於交換的區域必須大小相同。)

3. 然後點擊 確定。這兩列已被交換，並且單元格格式也已交換。請參閱截圖：

通過這個交換區域工具，您不僅可以交換行或列，還可以交換兩個區域的內容。點擊這裡了解更多關於此功能的信息。

演示：使用 Kutools for Excel 快速交換行或列

使用 Kutools for Excel 將資料從行轉置到多列

借助 Kutools for Excel 的轉換區域功能，您可以快速將一行或一列的數據轉置為多行或多列，反之亦然。

相關文章：

如何在 Excel 中快速交換兩個單元格的內容？