如何在 Excel 中垂直拆分儲存格值？

Author Xiaoyang Last modified 2025-08-23

在使用 Excel 時，您可能會遇到需要將單行或多行中的多個值轉換為垂直列表的情況。當資料以水平格式存儲但需要以列格式進行處理或分析時，這特別有用。

本指南將介紹三種高效的方法來垂直轉換儲存格值：

在 Excel 中將儲存格值垂直拆分到多行

使用公式（Excel 365）—— 最適合動態和自動轉換
使用 Kutools for Excel —— 專為所有 Excel 版本設計的快速簡易解決方案
使用 VBA 程式碼 —— 適合自動化處理所有 Excel 版本的理想選擇

透過公式（Excel 365）將儲存格值垂直拆分到多行

如果您使用的是 Excel 365，可以利用 TEXTSPLIT、TEXTJOIN 和 TRANSPOSE 函數，在無需手動操作的情況下將儲存格值垂直轉換。

請將以下公式複製並貼到空白儲存格中，然後按「Enter」鍵，Excel 將自動將資料溢出到多行，請參見截圖：

=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))

📝 注意：您可以修改公式中的分隔符（;）以匹配您的資料。

split cells vertically with a formula

🔍 公式解釋：

TEXTJOIN(";", TRUE, A1:A4 )：將 A1 到 A4 儲存格中的文字連接成一個由分號（;）分隔的字串。
TEXTSPLIT(...)：使用分號作為分隔符將組合的字串重新分割成單獨的值。
TRANSPOSE(...)：將生成的垂直值列表轉換為水平行（或反之，根據原始方向）。

優點與缺點：

✅ 優點：

✔ 動態更新：如果源數據更改，公式會自動更新結果。
✔ 無需手動操作：消除了重複手動拆分的需求。
✔ 可自訂分隔符：將分號（;）替換為任何分隔符（例如逗號、空格）以適應您的資料。

❌ 缺點：

✘ 僅適用於 Excel 365，不適用於舊版 Excel。

透過 Kutools for Excel 將儲存格值垂直拆分到多行

如果您使用的是 Excel 2019 或更早版本，您可以使用「Kutools for Excel」—— 一款功能強大的外掛程式，專門用於輕鬆轉換和管理資料。通過其「拆分到多行」功能，您可以根據所需的任何分隔符輕鬆地將儲存格值垂直轉換。

Kutools for Excel 提供超過 300 種進階功能，簡化複雜任務，提升創造力與效率。 結合 AI 能力，Kutools 能夠精準自動化任務，讓數據管理變得輕而易舉。Kutools for Excel 的詳細資訊...免費試用...

安裝「Kutools for Excel」後，請按照以下步驟操作：

點擊「Kutools」>「合併與分割」>「拆分到多行」，請參見截圖：
在「拆分到多行」對話框中，指定以下操作：
- 選擇要拆分的儲存格；
- 在「分隔依據」部分，選擇分隔符以定義儲存格內容應如何拆分。這裡我將選擇「分號」。
- 最後，點擊「確定」按鈕。

結果：資料將被轉換為垂直列。
split cells vertically with kutools

📝 注意：此方法直接在源區域拆分資料，因此建議在使用前複製並備份原始資料。

優點與缺點：

✅ 優點：

✔ 可用於所有 Excel 版本（2010、2013、2016、2019、2021、365）
✔ 無需複雜的公式或編碼。
✔ 支援廣泛的分隔符。
✔ Kutools 提供超過 300 種工具進行資料操作，節省其他任務的時間。

❌ 缺點：

✘ 需要安裝 Kutools

透過 VBA 程式碼將儲存格值垂直拆分到多行

對於高級用戶，VBA 提供了一個穩健的解決方案來自動化儲存格值的垂直拆分。以下 VBA 程式碼使您可以輕鬆地使用任何自訂分隔符將儲存格內容拆分到多行。

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

2. 點擊「插入」>「模組」，並將以下程式碼貼到「模組」視窗中。

VBA 程式碼：透過特定分隔符將儲存格值垂直拆分到多行

Sub splitvertically()
'updatebyExtendoffice
    Dim xRg As Range
    Dim xOutRg As Range
    Dim xCell As Range
    Dim xTxt As String
    Dim xStr As String
    Dim xOutArr As Variant
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
    If xOutRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xStr = "" Then
            xStr = xCell.Value
        Else
            xStr = xStr & ";" & xCell.Value
        End If
    Next
    xOutArr = VBA.Split(xStr, ";")
    xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub

3. 然後按「F5」鍵運行程式碼，將彈出一個提示框提醒您選擇要垂直拆分的儲存格值，請參見截圖：
vba to select the data range

4. 然後點擊「確定」按鈕，另一個框將彈出提醒您選擇一個儲存格放置結果，請參見截圖：
vba to select the output range

5. 點擊「確定」按鈕，並且儲存格值已經透過分隔符拆分為列表，請參見截圖：
vba to split the cells vertically

📝 注意：在上述程式碼中，您可以將分號 ; 更改為您需要的任何其他分隔符。

優點與缺點：

✅ 優點：

✔ 自動化流程，節省時間
✔ 適用於所有 Excel 版本
✔ 可根據不同的分隔符進行自訂

❌ 缺點：

✘ 需要具備基本的 VBA 編程知識
✘ 對初學者來說稍微複雜

在 Excel 中垂直轉換儲存格值可以通過多種方法實現，每種方法都有其自身的優勢。通過了解這些方法，您可以根據自己的需求選擇最佳方法，並優化您的 Excel 工作流程。無論您是初學者還是高級用戶，這些工具和技術將幫助您更有效地處理資料。如果您有興趣探索更多 Excel 技巧，我們的網站提供了數千個教程，幫助您掌握 Excel。

最佳 Office 生產力工具

🤖	Kutools AI 助手：以智能執行為基礎，革新數據分析｜生成程式碼｜創建自訂公式｜分析數據並生成圖表｜調用 Kutools 增強函數…
	熱門功能：查找、選取項目的背景色或標記重複值｜刪除空行｜合併列或單元格且不遺失數據｜四捨五入（免公式）...
	高級 LOOKUP：多條件 VLookup｜多值 VLookup｜多表查找｜模糊查找...
	高級下拉列表：快速創建下拉列表｜依賴型下拉列表｜多選下拉列表...
	列管理器：添加指定數量的列｜移動列｜切換隱藏列的顯示狀態｜比較區域及列...
	精選功能：網格聚焦｜設計檢視｜增強編輯欄｜工作簿及工作表管理器｜資源庫（快捷文本）｜日期提取器｜合併資料｜加密/解密儲存格｜按列表發送電子郵件｜超級篩選｜特殊篩選（篩選粗體/傾斜/刪除線...）...
	15 大工具集：12 項文本工具（添加文本、刪除特定字符…）｜50+ 儀表類型（甘特圖等）｜40+ 實用公式（基於生日計算年齡等）｜19 項插入工具（插入QR码、根據路徑插入圖片等）｜12 項轉換工具（金額轉大寫、匯率轉換等）｜7 項合併與分割工具（高級合併行、分割儲存格等）｜...及更多