如何在Excel中的一個單元格內交換或切換文本

發布:未知文本批量工具

如何在Excel中的一個單元格內交換或切換文本？

在許多情況下，出于某些目的，您可能需要在單個單元格中交換文本。例如，一個單元格包含一個名為Smith Smith的名稱，您需要交換該單元格內的文本以將該名稱更改為John Smith。本文列出了一些解決此問題的方法。

使用公式在一個單元格內交換或切換文本

使用VBA代碼在一個單元格內交換或切換文本
通過以下方式輕松交換或切換一個單元格內的文本 Kutools for Excel使用公式在一個單元格內交換或切換文本

下面的公式可以幫助您在Excel中的一個單元格內交換文本。請執行以下操作。

1.選擇一個空白單元格以找到交換的數據，在“公式欄”中輸入公式，然后按輸入鍵。看截圖：

=RIGHt(A2,LEN(A2)-FIND(" ",A2)) & " " & LEFt(A2,FIND(" ",A2)-1)

2.選擇結果單元格，然后向下拖動“填充手柄”以獲取其余結果，如下圖所示。

然后，您可以看到在指定的單元格中名字和姓氏被交換了。

備注：此方法只能在一個單元格內交換由空格分隔的兩個文本。

在Excel中的一個單元格內輕松交換或切換文本：

反向文字 實用程序 Kutools for Excel

可以幫助您通過Excel中的某些分隔符輕松地在一個單元格內交換文本，如下面的演示所示。

立即下載并試用！ (30-天）使用VBA代碼在一個單元格內交換或切換文本

如上面的示例所示，您還可以運行以下VBA腳本在一個單元格內交換或切換文本。

1。按其他 + F11 同時打開 Microsoft Visual Basic應用程序 窗口。

2.在 Microsoft Visual Basic應用程序 窗口中，單擊插頁 > 模塊。然后將下面的VBA代碼復制并粘貼到“模塊”窗口中。

VBA代碼：在一個單元格內交換或切換文本

Sub res()Dim xRg As Range, yRg As RangeDim LastRow As Long, i As LongDim strTxt As String, strFs As StringDim strLs As String, N As IntegerOn Error Resume NextSet xRg = Application.InputBox(prompt:="Range Selection:", _Title:="Kutools for excel", Type:=8)For Each yRg In xRgOn Error Resume NextstrTxt = yRg.ValueTrim (strTxt)N = InStr(strTxt, " ")strLs = Left(strTxt, N - 1)strFs = Right(strTxt, Len(strTxt) - N)yRg.Value = strFs & " " & strLsNextEnd Sub

3。按 F5 鍵來運行代碼。在彈出 Kutools for Excel 對話框，請選擇您需要交換數據的范圍，然后單擊 OK 按鈕。看截圖：

然后，您可以看到指定名稱單元格中的文本立即被交換。

備注：此代碼還可以在一個單元格中交換兩個單詞，這些單詞正確地由空格分隔。

通過以下方式輕松交換或切換一個單元格內的文本 Kutools for Excel

本節推薦的反向文本順序實用程序 Kutools for Excel 幫你輕松解決這個問題。請按如下方式操作。

申請前 Kutools for Excel請 首先下載并安裝.

1.選擇包含您需要交換的文本的范圍，然后單擊 Kutools > 文本 > 反向文字順序。看截圖：

2.在 反向文字 對話框中，指定一個分隔符，您將根據該分隔符交換文本 分隔器 部分。在這種情況下，我選擇太空選項。然后點擊 OK 按鈕。

然后您可以看到所選單元格中的數據被指定的分隔符立即交換到同一單元格中。

如果您想（30-day) 這個實用程序， 請點擊下載，然后按照上述步驟進行操作。

演示：通過以下方式輕松交換或切換一個單元格內的文本 Kutools for Excel相關文章:如何在Excel中交換或逆轉日期和日期？