如何在Excel中提取第二個空格或逗號之前/之後的文字？

Author Xiaoyang Last modified 2025-08-23

在Excel中處理文字資料時，您可能會經常遇到包含多個空格、逗號或其他分隔符的字串。雖然Excel中的「文字轉欄」功能可以根據選擇的分隔符將單元格內容拆分到不同的欄位中，但有時候您需要更特定的解決方案——例如提取單元格中第二個空格或逗號之前或之後的所有內容。本文概述了幾種實用的方法來完成此操作，包括針對第二個空格/逗號前後文字的公式、使用VBA宏進行自動化或處理大型數據集的強大解決方案，以及使用Power Query進行高級數據預處理的多功能選項。

a screenshot of the original text string and the two segments separated by the second space

使用公式提取第二個空格或逗號之前的文字

使用公式提取第二個空格或逗號之後的文字

使用VBA代碼提取第二個分隔符（空格/逗號）之前或之後的文字

使用公式提取第二個空格或逗號之前的文字

如果您想分離出出現在第二個空格之前的單元格部分，您可以結合使用Excel函數。

1. 在您希望顯示結果的空白單元格中輸入以下公式（例如，C2單元格）：

=IF(ISERROR(FIND(" ",A2,FIND(" ",A2,1)+1)),A2,LEFT(A2,FIND(" ",A2,FIND(" ",A2,1)+1)))

2. 按下Enter鍵。然後使用填充柄將公式向下拖動以處理所有需要的行。結果將顯示每行對應的第二個空格之前的所有文字——請參見下面的截圖：

提示：如果您想提取第二個逗號或其他分隔符之前的文字，只需將公式中的空格字符（" "）替換為您所需的分隔符。例如，對於逗號：

=IF(ISERROR(FIND(",",A2,FIND(",",A2,1)+1)),A2,LEFT(A2,FIND(",",A2,FIND(",",A2,1)+1)))

這種方法對於一次性提取或處理中等大小的數據集快速且高效。然而，如果文字高度不規則或行之間的分隔符數量差異很大，則可能需要進行額外的公式調整。此外，請注意額外的空格或空單元格，這可能會影響結果。在應用於關鍵數據時，請始終仔細檢查輸出。

使用 Kutools AI 解鎖 Excel 的魔法

智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
自訂公式：生成量身定制的公式，簡化您的工作流程。
VBA 編碼：輕鬆編寫和實現 VBA 代碼。
公式解釋：輕鬆理解複雜的公式。
文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！

使用公式提取第二個空格或逗號之後的文字

要提取出出現在單元格中第二個空格分隔符之後的文字，您可以一起使用MID和FIND函數。

1. 將以下公式輸入目標單元格（例如，D2單元格）：

=MID(A2, FIND(" ", A2, FIND(" ", A2)+1)+1,256)

2. 按下Enter鍵。將填充柄向下拖動以處理所有需要提取的行。這將呈現每行第二個空格之後的所有內容，如截圖所示：

提示：要提取第二個逗號或任何其他分隔符之後的文字，請將公式中的空格字符替換為所需的分隔符。對於逗號，公式將是：

=MID(A2, FIND(",", A2, FIND(",", A2)+1)+1,256)

使用VBA代碼提取第二個分隔符（空格/逗號）之前或之後的文字

對於大型數據集、重複提取或自動化場景，使用VBA宏是一個有效的解決方案。VBA允許您提取第二個空格、逗號或任何其他分隔符之前或之後的文字——在處理不同數據結構或需要可重複例程時提高效率。

1. 選擇開發工具 > Visual Basic。在彈出的Microsoft Visual Basic for Applications窗口中，點擊插入 > 模塊，並將以下代碼輸入到模塊窗口中：

Sub ExtractTextSecondDelimiter()
    Dim rng As Range
    Dim cell As Range
    Dim sep As String
    Dim direction As String
    Dim arr As Variant
    Dim result As String
    Dim pos1 As Long
    Dim pos2 As Long
    Dim xTitleId As String
    Dim outputCell As Range
    Dim i As Long
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select text range to extract from", xTitleId, rng.Address, Type:=8)
    If rng Is Nothing Then Exit Sub
    sep = Application.InputBox("Enter delimiter (e.g. space or comma)", xTitleId, " ", Type:=2)
    If sep = "" Then Exit Sub
    direction = Application.InputBox("Type 'before' for text before, 'after' for text after the 2nd delimiter", xTitleId, "before", Type:=2)
    If direction = "" Then Exit Sub
    Set outputCell = Application.InputBox("Select the first cell to output the result", xTitleId, Type:=8)
    If outputCell Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    i = 0
    For Each cell In rng
        If Not IsEmpty(cell.Value) Then
            pos1 = InStr(1, cell.Value, sep)
            If pos1 > 0 Then
                pos2 = InStr(pos1 + 1, cell.Value, sep)
                If pos2 > 0 Then
                    If LCase(direction) = "before" Then
                        result = Left(cell.Value, pos2 - 1)
                    ElseIf LCase(direction) = "after" Then
                        result = Mid(cell.Value, pos2 + Len(sep))
                    Else
                        result = cell.Value
                    End If
                Else
                    result = cell.Value
                End If
            Else
                result = cell.Value
            End If
            outputCell.Offset(i, 0).Value = result
        End If
        i = i + 1
    Next
    Application.ScreenUpdating = True
    MsgBox "Extraction completed.", vbInformation, xTitleId
End Sub

2粘貼代碼後，點擊運行按鈕，或按下 F5 執行。一個對話框將提示您選擇數據範圍，然後輸入分隔符，指定您希望提取的是第二個出現的分隔符之前的文字還是之後的文字，最後選擇一個單元格輸出結果。該宏將在您指定的單元格中輸出提取的結果。

最佳 Office 生產力工具

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